
SQUALE: I ORDINATEUR AlIX DENTS UNGUES 



La jeune societe frangaise 
AP0LLO7 vrent de mettre son pre- 
mier micro sut orbite L'appareil 
a 6t6 entierement concu en France 
par une equipe d'ingenieurs fana- 
tiques et pleins d'entnousiasme 
Resultat: une bonne machine qui 
va en decoder plus d'un ! 

LE TRIANGLE 
DES BERMUDES 



connecteurs attendent 

sagement. toutes broches a 

ir. qu'on les nourrisse 

Deis au menu: une carte 

synttietiseur de paroles, une carte 

contrbleur de disquettes, une 

carte sortie parallele, une 

carte analogique/numerique, 

une carte RS232C et une carte 

norloge. 

LE SQUALE A 
BOUFFE DE L'IBM 

II a digeVS le clavier professionnel 
de la grosse bete avec 55 touches 
AZERTY et 4 fleches de deplace- 
ment du curseur Par contre, il a 
mal assimite la touche RETURN 
qui est toute petite et tres mal 
place's 



Vols etes perdu dans la met de Is 
Micro avec un vieux sextant 
bouffe par la rouille. une bous- 
sole affol^e et sufftsammenl de 
vivres pour tenir le coup un petit 
mois Voire reserve d'eau potable 
est totalement fepuisfie Heureuse- 
ment, il vous reste cinq tonneaux 
de bon Rhum embarques a la 
Martinique et vous avez confiance 
en votre bonne etoile. 
Un soir d'ivresse, alors que les 
lames en furie balaient le pont de 
votre 12 metres, ce qui vous evite 
la corvee d'astiquage, vous deci- 
de? de faire le point sur ce fa- 
meux triangle des Bermudes dans ciete qui demarre 
lequel vous vous etes laisse en- 
fermer 

a ia premiere pointe du triangle 
se trouve I'archipel Apple A la 
seconds le continent IBM. et a la 
trqisieme rile Goupil Vous tracez 
trois lignes de conionction pour 
avoir une vague id6e de votre po- 
sition, et a leptcentre vous tom- 
bez sur une zone infesbie de 
Squales Vous grimpez aussitot 
sur le bastingage, une longue vue 
a la mam, pour inspecter les envi- 
rons Eftectivement, ie bateau est 
cerne d'ailerons inquietants 



LE SQUALE A 
BOUFFE DE L'APPLE 

L'idee gemale qui a fait le succes 
de I'Apple, ce sont les tameux 
slots qui permettent de connecter 
des cartes d'extension a I'mlini. 
Squale a repris ce pnncipe a son 
compte en dotanl sa machine 
d'un BUS d'extension Une 
grosse boite dans laquelle hint 



TOUT LE MONDE 
SUR LE PONT! 

ArfamS comme vous fetes, vous 
toncez a la cale chercher votre 
vieille iigne en bambou Coup de 
chance, il vous reste une boite 
d'asticots dans un placard Aussi- 
tot. vous appatez et vous jetez 
votre Iigne par dessus bord Le 
resullat ne se fait pas attendre ca 
mord au bout de deux minutes 
Votre horoscope ne vous trahit 
pas, et votre fil en nylon de chez 
Rhone Pouienc resists aux trac- 
tions de I'animal qui se debat En 
moins de temps qu'il ne vous en 
faut pour descendre le foe, le 
Squale est remonte sur le pont 

LES CHIENS ABOIENT 
ET LA CARAPACE 
PASSE. 

Votre premiere impression est 
d'avoir peche une belle piece 



C'est nouveau, pa vient de sortk ; 

L'actualite de la micro-intormaiique. Lire page 8, 9. 



Pout, Pout, 

Cette semaine les petlts mickeys sont de COUCHO. Voir page 13 



BIDOUILLE GRENOUILLE 

Ou comment tricher, pirater, modifier, trafiquer, magouiller, 
bldouiller et grenouiller avec les logiciels du monde entier. 
Mais dans la legalite, au moins ? Of course, mon general ! 
Lire page 8 



Son capot est en metal lisse el 
froid. it pese trois kilos et sa 
taille est de cinquante centimetres 
de longueur 

Malheureusement, seuls les 1500 
premiers exemptaires possedent 
cette carapace en metal Les reje- 
tons qui vont suivre seront tout 
simplement en plastique ABS. Ce 
qui ne modifiers en rien te tres 
beau design de la machine Et 
vous pourrez voue le faire tomber 
sur le pied sans vous briser trois 
metatarses Le squale possede 
bien stir un gros aileron qui saille 
sur son coti droit C'est la que 



LE SQUALE A 
BOUFFE DU GOUPIL 

C'est evident, puisque le BASIC et 
le systeme d exploitation DOS 
FLEX sont les memes Pourquoi 
ne pas avoir adopte l 'universe! 
BASIC MICROSOFT ? C'est exac- 
tement la question que vous vous 
posez, et une meduse qui passait 
par la vous cne la reponse la li- 
cense MICROSOFT coDte 75 
bStons plus un reversement de 
150Frs par machine vendue Trop 
lourd a porter pour une jeune so- 



veau I H 92 k de mftmoire bien 
vivante (utilisateur), plus 4 K de 
memoire d£ja morte pour le moni- 
teur. En y regardant de plus pres, 
vous constatez que 32 k sont re- 
serves a faffichage graphique. 
C'est beaucoup, mais le squale 
est capable de generer des des- 
sins impeccables, d'une resolu- 
tion de 256 points par 256 points, 
avec 16 vraies couleurs par point 
On peut melanger textes et gra- 
phiques sans problemes Ca vous 
fait bien plaisir, parce que vous 
etes un tana de bantfes dessi- 
nees O'ailleurs vous avez la col- 




senfichent les cartoucnes RHUM, 
pardon ROM PACK, pour le plus 
grand plaisir des petits feignants 
qui nont pas le courage de char- 
ger une disquette uu une cas- 
sette . 

UN ANIMAL BRANCHE 

Tres tier de votre prise, vous vou- 
lez examiner les siennes Vous re- 
tournez la bete sur le dos avant 
de la dSpecer Et la, vous consta- 
tez que rien ne monquo 
connexions pour cassettes, dis- 
quettes, impnmante ou table tra- 
gante, joystick, light pen, modem 
ou minitel. sortie SECAM ou mo- 
niteur, BUS d'extension Ca vous 
chauffe le coeur qui est bien gele 
par tous les embruns du large 

LE DEPECAGE 

Armfi d'une fourchette, d'un cou- 
teau et d'un toumevis, vous de- 
ballez les entrailles du Squale et 
vous etalez le tout sur le pont. Le 
microprocesseur, un 6809, bat 
encore a la vitesse d'1 MHZ 
C'est parfaitement honorable 
Tiens I Lahmentation est inle- 
gree ! ! Ipso-facto vous en lirez 
la conclusion que les ortfinateurs 
sont comme les haricots verts: 
moins il y a de tils et plus c est 
aqreable 
Waouhhhhh ' ' ' Quel cer- 



lection complete de Gaston La- 
gaffe en fond de cale, en cas de 
naufrage sur une Tie deserte 

LE CHANT 
DES SIRENES 

Au fur el a mesure que I operation 
avance, des sons etranges vien- 
nent vous chatouiller les oreilles 
Pas de {toute. c'est le generateur 
de bruits Puis, ce sont de 

tout juste le temos de vous en- 
chainer au mat pour ne pas vous 
foutre a l'eau. Les sirenes sont en 
tram de taper le boeuf sur le syn- 
theliseur du squale trois voies 
(comme les autoroutes). et cinq 
octaves (comme Nina Hagen) 

ET MAINTENANT, 
A TABLE ! 

Tout est en place pour une de- 
monstration Vous branchaz le 
squale sur votre generateur de se- 
cours. L'ecran s'illumine dun 
fond bleu marine qui vous rap- 
peile le decor ambiant Ouatre let- 
tres dor s'affichent dans le coin 
supeneur gauche PRET ' Si c'est 
pas frangais, ca madame 
CHHTOKK. vous lui enfoncez une 
cartouche dans laileron pour bien 
lui montrer que c'est vous qui de- 
cidez, et il refleciut quelques se- 



condes avant de comprendre ce 
qui lui arrive. 

Comme ses concepteurs n'ont 
pas lysine sur la demonstration, 
une floppee de couleurs vous 
gicle a la figure. Ca pan dans 
tous les sens, en rectangles, en 
cercles, en rayons et en moires ( 
Trois merous assis sur un banc 
de dauphins applaudissent de 
toutes leurs nageoires. 

LE BASIC 
PREND L'EAU... 

Satisfait de cette premiere prise 
de contact. I'envie subite vous 
prend de lui titiller le BASIC, his- 
toire de voir Et la, un leger voile 
de deception embrume soudain 
votre visage bunne L'editeur est 
suffisamment mal foutu pour 
vous empecher de faire tranquille- 
ment vos corrections. Ce qui est 
g£nant, car vos doigts geles par 
les vents du large ont du mal a 
courir sur le clavier Malgr4 cela, 
vous parvenez a taper un pro- 
gramme de dix Irgnes, et par 
soucl de verification, vous tapez 
LIST Horreur I Le scrolling 
d'ecran est aussi lent que votre 
grand mere quand elle descend de 
son sixieme etage pour aller ache- 



DEULIGNEURS 

Les faineants sont a la page 7 



FORMATION A UASSEMBLEUR 

Le prof et I'amateur eclaire vous attendent a la page 17 



Jacques Girard triche et empoche 
les 20.000 F. du concours mensuel. 
Voir page 3 



ler du lait a son chat ! 
C'est a ce moment que Steeve 
Cbadefaux. le PDG du squale, qui 
passail par la sur son chris-craft, 
saute sur le pont II se precipite 
vers vous, alerte et jovial. 
"Stop I" crie-t-il, "ne commencez 
pas a crltiquer le BASIC de mon 
appareii. je vais tout vous expli- 
quer 111 

Vous lui lancez un gilet de sauve- 
tage, et vous finvitez a s'asseoir 
dans un transat qui trainait par la. 
"Le Squale que vous avez entre 
les mains est un prototype I Nous 
nous sommes rendus compte que 
le BASIC etait lent, mais rassurez 
vous, il n'en sera pas de meme 
pour les machines de serie. II 
suffif de faire une petite modifica- 
tion de 52 octets dans le moniteur 
et de supprimer un scanning du 
clavier inutile C'est ce qui lui fait 
perdre du temps Mais vous ver- 
rez qu'en version definitive ga Ira 
au moms dix fois plus vite I 

LE COURS DU SQUALE 

Vaguement rassure" par ses 
propos, vous decidez de profiler 
de la presence du BOSS pour lui 
faite cracher ses tanfs 



ENFIN, UN BON LOGICIEL 
POUR THOMSON 



pour Apple, Commodore ou 
memo Spectrum aux logiciels 
existants pour les ordmateurs 
Thomson, on ne peut etre 
que decu par I "evolution de la 
qualite des produits pour ces 
machines frangaises En 
effet, les Thomson T07, M05 
el TO7/70 ne s'etant pas ou 
peu exportes, les productions 
restent exclusivement fran- 
gaises et la taille du marcrte 
potentiel ne permet pas aux 
edrteurs d'investir dans la 
conception de logiciels origi- 
naux et couteux. 
Et ne voila t-il pas que, 6 sur- 
prise, AIRBUS arrive en 
contradiction complete avec 
la politique actuelle des fabri- 
cants. Tout a fait comparable 
aux Flight Simulator de Su- 
blogic, AIRBUS est un logi- 
ciel de jeu developpe comme 
un logiciel professionnel et 
sa qualite est irreprochabie. 
II reproduit fidelement le 
comportement du fameux 
avion et permet une simula- 
tion realiste de pilotage. Les 
graphismes, ('utilisation tres 
pratique des deux manettes 
de jeux et le livret d'une cen- 



pagne juslitienl. pour une 
fois, son prix eleve: environ 
500 francs. Vifi-Nathan a in- 
vest! pres d'un million de 
francs pour la conception 
d'AIRBUS qui a demande 
plus d'un an de travail, espe- 
rons que cette operation sera 
rentable et que les autres 
editeurs embolteroni le pas a 
cette heureuse initiative. 



.—i 



CONCOURS PERMANENTS 

Voire programme, non content de vous rapporler 1.000 
francs par page publiee, peut vous rapporler 20.000 
francs chaque mois ou un voyage en Californie pour deux 
chaque trimeslre. Reglement en page interieure. 
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BASIC HUNTER 



Partez a la chasse au "Basic" et rapportez le maximum 
d'instructions clefs dans votre gibeciere 
II vous suffit pour cela de supprimer grace au joystick 
les lettres genantes. Une fois la chasse terminee, ap- 
puyez sur le bouton rouge. 

P. PHILIBERT 



1 REM 


<> 


ooooooooooo 




2 REM 


<> 


<> 




3 REM 





BASIC-HUNTER O 




4 REM 


o 


<> 




5 REM 


<> 


PHILIBERT. P 1385 O 




6 REM 


o 


O 




? REM 


o 


ATARI B00/608XL <> 




8 REM 


o 


<> 




9 REM 


o 


<> <> o <> o o <> <> <> <> 




I a REr 








n Dir 


BSC80),AA*CB0 3,AB*C40),MSC 


03,AL« 


r26],Be*c80) J y*cn,s*C80],ac«c40) 


BD*£40 



• CHASSE 



12 AL4= M ABCDEFGHIJKLMNOPQRSTUUUXY2'' :P=0: 
NW=0 

13 GOSUB 3000 

15 GRAPHICS 

16 POKE 710,0:POKE 712, 192SP0KE 752,] 

20 POSITION l,10i? AA*:IF F=2 THEN POSIT 

ION 1,11 J? AB* 

30 D=PEEKC560)*256*PEEKC561) 

32 E=PEEKC0*4)t256*PEEKCD+5J 

40 POSITION 2,ls? " PARTIE: POINTS: 

TEMPS : ■' 
50 POSITION 11, If? P:POSITION 24,]:? NW 
110 X=0!Y=3 

140 IF PEEKC540J=0 THEN POKE 540,4?:T=T- 
UPOSITION 36,]:? T ; " " iff T=0 THEN 600 
145 IF PEEKC6443=0 THEN 600 
150 IF X<0 THEN X=0 
160 IF X>38 THEN X=3B 
170 IF Y<2 THEN Y=2 
180 IF Y>23 THEN Y=23 

185 POSITION X,Y:S0=144:IF P£EKCE+40*Y*X 
)=0 OR PEEKCE+48*Y+X3=84 THEN S0=72 
190 ? CHRSC20);:SOUND 0,0,0,0 
250 POSITION X,Y:IF S0=144 THEN SOUND 0, 



SO,] 



.15 



306 


7 " 




:Y=Y> 


:G0TO 


380 


310 


? " 


";:X=X+ 


-■y=V- 


:G0TO 


rww 


320 


? " 


" i =x=x+ 


:GOTO 


360 




330 


? " 


' ; :X=X- 


:Y=Y* 


:G0T0 


mo 


140 


? " 






= GOTO 


see 


358 


? " 


' ; :X=X- 


:G0TO 


380 




368 


? "' 


' ; iy»Y+ 


= 60 TO 


390 




370 


? " 


1 J :Y=Y- 


:G0TO 


380 





360 SOUND 0,SO,10, 15:G0T0 140 

400 IF PEEKC53273J=B THEN RUN 

420 IF PEEKC53279)=5 THEN POSITION 10,3: 

POKE 710,2:? " REINITIALISATION " :GOT0 3 

100 

430 GOTO 140 



538 REM 

599 REM '" "■' 

609 REM " FIN DE 

601 REM " 

602 REM 

603 SOUND 0,0,0,0 

604 POSITION 10,3:'' " FIN DE LA CHASSE " 

605 I=0:SS="" :NWP=0 

608 1=1+1 :IF I>40*F THEN 700 

810 IF PE£K[E+400+I)=0 OR PEEKCE+400+I)= 

84 THEN 608 

620 SSUENCS*]*n = CHR*[PEEKCE + 400+I3+32] 

630 1=1*1 :IF I>40*F THEN 700 

640 IF PEEK(E-t-400-I3=0 OR PEEKCE + 400+I )" 

94 THEN 650 

645 GOTO 620 

650 RESTORE 2900-U0*( ASCCS*[ 1 , 13 3-65] :RE 

AD A:READ B:IF B<LENtSt) THEN SS= M ";GOT0 

60S 
660 FOR J = I TO A:READ MS iIF M*=S* THEN N 
U=NU+1 :NU1P=NWP+I :S*="' :G0T0 608 
670 NEXT J 
6B0 S*="":GOT0 608 

699 REM 

700 REM RESULTATS 

701 REM 

702 NBT=NBR:IF F=2 THEN NBT-NBH 
705 POSITION 24,1 :? HU 

710 IF NUP=0 THEN PO5ITI0N 12,5:? » BRED 

OUILLE 5" :GDT0 740 

720 IF NUP>=N8T THEN POSITION 15,5:? « B 

RAUO " :GOT0 740 

730 POSITION 6,5:? " UOUS P0UUE3 FAIRE M 

IEUX i" 

740 POSITION B.IS:'' " UOICI LES MOTS CAC 

HES: " 

750 POSITION I, IB:? BC* 

755 IF F=2 THEN POSITION 1,19:? BDS 

760 POSITION 11,22!? ■' NOUUELLE CHASSE? 



999 REM 

1000 REM ====================== 

1001 REM = TIRAGE DES MOTS BASIC = 

1002 REM =============== = == == === 

1003 REM 

1004 AA*="":N8H=0:NBR=0 

1005 NE=INTCRNDC0)*B):FOR K=l TO NE:IF L 
ENCAA«3<80 THEN AAttLENCAAS 3 + 1J = NEXT 




010 NP=INTCRNDC0J*24] :RESTORE 2000*10*N 
:READ NM:IF NM=0 THEN 1010 
020 READ NB:NB=INTCRNO(0J*NM)*1 
030 FOR K--\ TO NB:REA0 M*:NEXT K 
035 IF LENCAASX40 THEN IF LENC AASJ+LEN 
M$3>38 THEN 1005 

040 IF LENCAA*]<-LENCM*J<79 THEN AAtCLEN 
AA*J + 1]=M$:NBH=NBH+1 :IF LENCAASX33 THE 
I NBR=NBR-.l 

050 IF LEN[AA$)<80 THEN 1005 
060 BBS'AA*Clj38J :8CS=BBS:BBSC39)=AAs(4 
,?B3:BDS=AASC41,?8J 

070 FOR K=l TO 80=IF AASCK,K3=" " THEN 
NB=INTCRNDC0J*263*1 :AASCK,K)=AL«CNB, NB3 

090 AB*-AAS(41,78) :AA$ = AAS£ 1 , 38) 
094 RETURN 

996 REfl 

997 REM -FICHIER INSTRUCTIONS BASIC- 

998 REM 

939 REM 
2000 DATA 5,3,ABS,ADR,AND,ASC,ATN 
2010 DATA 1,3, BYE 

2020 DATA 10, 5, CLOSE, COLOR, CLOAD,CSAUE,C 
HRt, CLOG, COM, CONT, CLR, COS 
2030 DATA 5,6,0RAUT0,DATA,DEG,DIM,rJ0S 
2040 DATA 3, 5, ENTER, END, EXP 
2050 DATA 2,3, FOR, PRE 

2060 DATA 4,8, GRAPHICS, GOSUB, GOTO, GET 
2070 DATA 0,0 

2080 DATA 3,5, INPUT, INT, IF 
2090 DATA 0,0 
2100 DATA 0,0 

2110 DATA 2,6, LOCATE, LPRINT, LIST, LOAD, LE 
N, LET, LOG 
2120 DATA 0,0 

2130 DATA 4, 4, NEXT, NOTE, NEUI, NOT 
2140 DATA 4,?,ONGOSUB,ONG0T0*GPEN,OR 
2150 DATA 10, 8, POSITION, PADDLE, PRINT, PTR 
IG, POINT, PEEK, POKE, PLOT, PUT, POP 
2160 DATA 0,0 

2170 DATA 7,7, RESTORE, RETURN, REAO, RAD, R 
EM,RND,RUN 

2180 DATA 12,3,SETC0LOR,STATUS,SOUND,STI 
CK,STRIG,SAUE, STEP, STOP, STR*,SQR, SIN, SGN 
2190 DATA 3,4, THEN, TRAP, TO 
2200 DATA 1,3, USR 
2210 TJATA l,3jUAL 
2220 DATA 0,0 
2230 DATA 1,3,XI0 
2240 DATA 0,0 
2250 DATA 0,0 
2336 REM 



2997 REM . 

2998 REM < PRESENTATION 

2999 REM . >\\s\v\s\\ - 

3000 REM 

3010 GRAPHICS 17 

3020 ? tie;'' BASIC-HUNTER":? #6 

3e30 FOR K»l TO 50:POKE 708, 5*K 

3040 NL=RNOC03*19*4:NC=RNDC03*12 

3050 N=INT(RND(0)*26):RESTORE 2000+10*N; 

READ A:IF A=0 THEN 3050 

3060 M=INTCRNDt03*A3+l =READ A 

3070 FOR J = l TO M:READ MS:NEXT J :P0SITI0 

N NC,NL:? S6;' 1 ";M*; 

3080 FOR J=10 TO 60 STEP 10:SOUND ( 

,15:NEXT J : SOUND 0,0,0,0 

3090 NEXT K 

3100 GOSUB 1000 

3110 GRAPHICS 1:P0KE 708, 16*2+6 :P0KE 709 

,0:POKE 710,]6*13+6:POKE 711,0!POKE 712, 

16*13 + 2 :P0K£ 752,1 

3120 ? *6; ' PARTE? A LA CHASSE" 

3130 ? #6;" AU BASIC" 

3140 ? #6:^ #6:'' #6 i " CHASSE2 AUEC LA 

BOULE LES LETTRES INDESIRABLESS " 
3150 7- #6:*? *6i ' DES INSTRUCTIONS BA: 
C Y SONT CACHEES" 

3155 ? #6J? #6i"TR0UUE2 LES OITE" i 

3160 ? «6;"ELLES SONT SEPAREES" 

3165 ? #6:? m:" 3 #6; "FIN DE LA CHASSE— 

--->PRESSE£ LE BOUTON" 

3170 ? CHR$C125):P0KE 656,0:PQKE 657,1=? 

'SELECT: REINITIALISATION START: RUN 

"FORCE CI 
<$="2" THEN 3200 
3:T=20:IF F=2 THEN T= 



3310 REM 


n 


i [ i r. 3t ] c ] r ] i t : 3 [ ] [ j [ ] c ] u 


3320 REM 


n 




3330 REM 


n 


PRINCIPALES UARIABLES [] 


3340 REM 
335)0 REM 
3360 REM 
337S REM 


[] 
11 
tl 
n 


F: FORCE t] 
P:NOMBRE DE PARTIES I] 
NU:NOnBRE DE POINTS I ] 


3380 REM 


(j 


AA«:TIRAGE AU HASARD [] 


3390 REM 


n 


BBi:MOTS CACHES tl 


3400 REM 


[] 


T:TEMPS ALLOUE EN S [3 


3410 REM 
3420 REM 


id [i 
nuMuunnnnnnunn 



BILLARD 



A quoi bon rouler votre bille dans les cafes lorsque 
vous pouvez le farre gratuitement chez vous sur votre 
Spectrum et dans votre lit. 



SPECTRUM 



Michel PALTRIER 



.._ "b-coDe 3ieea,eee 

• 3 BORDER 2: CL5 

4 REM "Programme biUerd po 
ur apectruK la ou 48K. 

72: POKE 3a4.ea,!>: POKE 38*03 , 1S6 
POKE 31388,355: POKE 31891 ..l*: 
POKB SlMSiiB: POKE 31383-139 
IB rSnDOMIZE USR 31*24.; RRNDOM 
XZe USR 32535 _ 

— 5 RINT AT 3,4, "■" j HT 13 " 

■ ■ ~ 18,0; "■" 



iRT_17,15, "■",RT 



,OT 1 



: POKE 32403,0: POKE 33403,126 
138 RANDOMIZE USR 31934 
140 PRINT INK lift- " 

10,0i ,, §",P.T 13,0; "L 
14S IF 4 CI) >5 THEN 00 SUB 4000 

145 PRINT RT 0,1; "scorei"";* (i'l 
;RT 0,12; "lirsB-jp 

146 PLOT 0,186: DRRU «oo,w 
170 IF n=3 THEN GO TO 2000 

1010 IF Stl)>0 THEN PRINT INK 

RT 6,ia;' , i";RT 18,12; ,, |" 
1023 IF sTl) >l THEN PRINT INK 
AT 9,9l' 




3050 PLOT 



IF i ill >5 THEN 00 SUB 4000 sags 
PRINT RT 0,1; "scorei"";* til 3860 



1830 '*F », 



30 RfiNDONIZE USR 32000 

60 CL5 : QUER 

70 PRINT RT 2,8,"RE<3LES DU JEU 
" , RT 4,3;"un jOueur";RT 5,5,"-De 
puctz Le croixc+l « i8TJfi<2C^.*. 
aide des touches a fl";RT 7,7;" 
et a a P .";RT 8,6, "-flppuyez sur 
Z : La boui.«";flT 9,7, "part dans 
La dir«ction";RT I0,7;"d« La cro 
ix.Uisez les",RT 11,7, "buts a ga 
athi. 

30 PRINT RT 13,3; "DtUX jootuft 
";bt i*,6;' , -Co«ae a un ^outur et 
".RT 15,7; "donnez la pv»s*ance d 
u r ';RT is,7,"tir 1 a I000\3*0»ur 
M«r";flT I7,7j"de I'tcran) ";rt i 
8,6; "-joijeuf 1 :tir a gauehf";RT 
19,6, -joueur 2 tir a droit*"; 
RT 2l,3 | ;"tapt2 m pour arrcter la 

100 INPUT "NOMBRE DE dOUCUSS (1 

OU 21 : ";n 

110 IF n<l OR n>2 THEN 00 TO 10 

120 CL3 : DIM i (St 
130 LET P«0; LET Kal 
136 POKE 31380,255: POKE 31881, 
3: POKE 38400,118: POKE 32401,72 




.RT 13, „ 

it >a then Print ink 

l";RT 19,14; ^i" 

li >3 THEN PRINT INK 

■"RT 13,3, '■■" 

' THEN PRINT INK 



PLOT K+1,U 

PLOT X,g-1 

THEN OUEB 

... .0 3100 

3 S55 Cfe* ... 

tx+UJ <249) i LET y =■ 

>6 RND Cy+v) <i69f 

3070 BEEP .001,60 

3930 SO TO 3910 

3100 OVER 0: LET l=PEEK 33400 

ET hsPEEK " ■ 



m" THEN RUN 3 



hsPEEK 33401 



PND (yt 



LET a»PEEK 3340 



3340 PRINT RT 0,3,8 i 



3370 PLOT 0,153: ORRU 335,0 

3300 RETURN 

4-000 FOR ftwg TO 4 

4010 LET x«INT tRND*37)+a: LET y 

*INT CRND*19) +2 

4020 IF tPTTR tu,x)«57 OR RTTR ( 

a,X+llx57 OR RTTR (y,x-lS"57 OR 
TTR (^+1^X1=5? OR RTTR Cy-l,xl- 



_ ,i; , *au J 

i. - ..rtr": OUER 
.^T INK URT 11,82; "i";fiT 
";flT 18,31, "§p 
20SO SO SUB 4000 
2060 LET k>P.BS CK-1) 
2070 PRINT INK 1; RT 81,18; "■" 
2075 OUER 1: PRINT RT 21,18jPttl; 

OUER 
2100 00 SUB 3000 
2110 GO TO 2050 

3000 FOR M*0 TO 4 

3001 QUER 1: LET X-100: LET y >1Q 


3010 PLOT X,y: PLOT X+l.U: PLOT 
X-l,y; PLOT X,y+1; PLOT x,y-l 
3020 LET u»IN 63466-IN 61433 
3030 LET V=IN 57342-IN 64B10 



3110 LET ga235-8*INT CL/321-C56 
RND h>71)-(56 RND h>79)-h-y 
3120 LET f =S*U-32*INT (1/32) )+e 



127/f)+(128 RND g>0): LET eoflBS 

(g/f) 

3140 IF RBS f<RBS g THEN LET b«l 
37+1128 AND g>0): LET c>ABS (f*l 
27/91 +(133 AND f<0): LET eaflBS ( 
f/gr 

3150 POKE 31882, C: POKE 31683, b 
3160 IF n*l THEN 00 TO 3380 
3170 INPUT "PUISSANCE DU TIR <i a 
1000) :";r 

r<l OR r>1000 THEN 00 TO 



31380, 

■■■.> :■*! PftN 

?OM|ZE USR 32000 

3310 IF PEEK 31833 <>128 THEN GO 
- a 3J« 

IF PEEK 31B82>128 THEN LET 

l330*IF PEEK 31882<126 THEN LET 
ft (1) mi ID +1 



RTTR ty+l.x) =57 OR I 
57) THEN GO TO 4010 
4030 PRINT INK URT 

4040 RETURN 

5000 SfiUC "billafd" 

"b^CODE 31630,863 
6000 UERIPY "hi I Lard 
"CODE 31830, 9r _ 



y.x 



NEX 



LINE 1: SRUE 





SIRIUS 



Plus "speed" que Sirius tu meurs! Ce programme 
100% en langage machine mettra vos reflexes a rude 
epreuve. Le but du jeu est de repousser les siriussiens, 
etres tout aussi etranges que dangereux. 



P. GAUTIER 



suite duN 67 




COMMODORE 64 



edito 



tmii^ji;'- ■■::.'■;=■:■: \23-Z27. \zz- )S.< ;■;,- is; i .?■?.- 22'A7,.< 1^3,237,153,123 
nnm2.:.7,i^.i.\z-< ,.■.;;- ;?3 i>j ;?- >;j i;5.£37.s5,: 

fiHTf:^? J'.?p. >i '33 -iy il 13 45 a 12 5 72 ■ 55 - I'd- 53 ■ i'S 
nST>=i .■.:■■' -"-■ i-Ti ^i.;t a? .L'3 <-i 5 :-,2 5 U.3,0 IT 



i c!'i6.;:i-,S8.2a2,^a IS8»I95 96 534. ,75 -2 j 551 



i'r:!":-!?.-!.;.-. i 7 3.54-23:1, 2 5- l 34] - 15 :-n .24,2i2. 1 73,(5.5-15.5- 1W, 41 
DRTfll50.14i .£ =12 238,! ■:■&, .53;, .5 v Si ; ;}:; . ; 5. 755 . 76 ■ 3M, 136,234 
DflTfl234, 234, 5.54 334 - 257... 554 . 7-34.73,;. 55 .' 1 1.5 3 . 52, 15, 22>5 
HfiTjili 55515 ?. 15 IS 5. lSa-lSe, 1 ;-*; ir*. l?t., 17-s 1,V2. 1S9, 168- 19 
DRTB3, 18,3,21, 13, -..5- 1 iif, S«. 1 . :■:. I 1 , 165 . if.ii, 1 "7 . ! 5? - 15-:- 

DHTfH8e,t6e.i.-;a,i5-:i l 1 -^, ir-;<, i.- ; .f, leo. 55.1, 53. 355, i,?e 2>m ?2,2@8,i 

DfiTfl96,201-3f,2'?3, 1 55, 35; -it- 233.- ! 5;2- . 7t. . ij . ,?>jd, 233. 11,50* 
DATR2B6, 32. 158, 201, & , 2-i* . 1 . if. , 554.524 2,14. 5 M. 1 53,::-: .' . 153, 9.0 
iift-M.H fi.M: :;:.- ;se..-^.,i;:..irT..^.22N..^l -135 i£,l 56,173,6? 
DHTftlS8,*l,l,9, 1,141,67, 138, 173,4,226,141,72, 158,173,4,228 
DflTB234 234,234,234,28! .230,16,1,56.173-77,158,9.1,41,1,141 
Br-iTR77. 158, 153, 19. 132', 141 .52. 1S6, '36- 1 rj . 11 513L41 11 .;12 175 5 
PffTfl2 12, 3,3. 41, J, 24 1,3,212- 172: 12'. 212. 9, 1 1 ,41. 1 1, 141 , 12 
DfiTfl212, 1?3< 13,212. 142, 13-212 173 1 1 . -U-,41 . 1 23 9 125 141 , 11,212 
i.'iin-i. . ;■' . :4. 234. 234 1. . ! ,:u 41 r. 14| . 1 220 173.1 22-3 41 
DflTFil5-291 15.2413,70 201 ■ 7. 2m, 2'i . 238 . 12,505, C3, 12 . .,:B3, 141, 12 
PRTH2e3.173, 1 raj : v. ,5 n«. 234, 234, 234 

pMTfl2 34.2-34.2'3! LI . i<&- - ■=?, 555't.. 1 ,: - 2*3 . l-'5 - 12. .MB. 14-1 12.238-173,12 
DRTR2e8,201. 3? 545 1 . 3i . £55 ■ is- 265. 96, 4 ?_Z% . 3 0, 41 ,0, 141 
P3T8422P >;..;;.-, .;.;s. 23-; 554 .234 2'2M 23-J 2:34, .2 3-; 22-:- . 224 - 234 234 23-. 
CRTH234 ■ 36 ■ 9t (7.23.5,' i58-2i:n 3 54S ■ 30 ■ 261 2 - 240- 22-.- i. 38.57, 153 
DflTR3e,234. 32 i:, 157- 9,3 2:, .2223 4 2333 2233 253 235.25- 2:35 255 254 
DpTfl.2 34 2 34. 2 24- 2 34, 2.34. 2-34- ;"-!:- 37. 158.9,0.41.0-141.57. 153,96 
l'r'<T;i235.25T. 17.3. 10:3 157 . 141, !8S- 157 1 73- 108- !523 2C! 1 258,1 96-76 
DRTA12. 196, 234,234, 234, 169, 0,141, 14,208, 173, 30,208.141,30,208,234 
DRTfl234,234 234 234 =03,141,30,; 

DRTR36, 173, 1,220, 141, 1.220, 173, 1,220. 41, 16. 201- 16, 208- 1,36 
DflTfil73.ie8. 157,9, 1.41,1,141.103.157,173,12,208,141,14,208,173 
DRTfllS, 206, 9, 21S, 1 1,21B, 141,15,208.32,21.197,96,234,234,127,127 
DRTR173, 108, 157,141, 108, 157, 173, 108. 157,201. 1.248, 1,36,286, 15,208 
DRTB206. 15.208,234,234, 234, 173, 15, 208. 141- 15, 283, 173, 15, 208,201, 54 
HRTA240, 1,96. 173, 15. 203, 9, 217, 41, 217, 141. 15,203, 173, 108, 157,9 
WW 41 14! I5(i. 157. 9,:.. ,3,6.13. 127.-0- 1 19 0. 3- 3,255 
LiMTfi : 7:, .;;';■; . 255-235 255.13,183,0 u 129 3T.5 2-55.173 3.21^.9,20 
[ifiTKi:!! K(; ;41 :■■: 17 2 (i 21 2 4 1 ■ 1 3 ■ 9 , 1 8 . 141,11,212,173,11 

DftTfl212,4!,19.9,1914l . [1,212 173-12 212.3,5-141,12,212/96 
DFitr,: 3-1.2J2 9. 2'3S-2C'b, 82. 158. l.'J 2:2 158. 208 13-173-77-158,9,0 
DRTR41. 0.141 77 158-7t-. 151 199-284-234.234.234 234234 234 234 234 
riRrfl234- 234-2-34, 7^. ;si. 139, .72-1, 238-1 808 38., - 32, 158. 1 73 ■ 32 153 246> 
PF.TH13 !73 37 158,9 .3 'li.tJ-141 37. 158 ■ •'(■■ 151 . 139, 834 . 234,234 
1)8111234- 78. 151 153 284 3>4 ;i4 . 234,32 - 84, 198 ■ i 73, 33 153,9,0.41 
B8T13P 141. 53-158. 78, 5i:--;:'5, 224, 76-56, 192' i80-,28 162 255.202,283 
Dffmasa ;::6-.233-848-96 53,158-173.56 13 818.3 12.41 12.141.13 
ri9T,3J12-9- 19 -M 12-/ [-:]. ;- 2222.8l2.-82. 18. r.J2:.l'i8.3.28i 203,253 
<i;9T*32 513.195 1"3 8888 !-!j 3 ,;08 . !'2i5 - 87 141 8 2Bi 1.41,2.208 
FRTR105, 27,141 4 288. )4J :8 208 ■ .'■ . - ■■. 8 '■ fSMS iOt 

liFiT'3848 . 233 33.158 17 2 3.2: -,'= 2 |R 197 

DRTfl.32 62, 155. 1^3 108. 157 23! . : . 2423 3. 17 3- i282'6, ! ,1 L 14 803. 178 
[I8T367. 153 201 - 1 840 20-173 77 Am, 20! - ! -240 35. 73 8 200,234 
DHTR234 234 25423". 234 76 a. .iyO 234,234 . 53 - 189 - 2^, 284.234.284 254 
DflTR.. 12 3.4. 224 2 I 173 72.153 

D8i-085:E: 3,28- 1-2.67.158,3,3,41.0,1.41 .S7. 158. ?c.. 0- 258. 234,234 
DHTfl2-34.254.234,2 34 23J 334 534.334 284 76 . ]88 - 133- 8 - 8 - -'6, 124. 136 
D(iTM255 5 3.35.8. 104, 127-56. 3. 3-253-173. 4, 220,201, 172 
DRTR240, 1,96, 173, K? 153 9. 1 . 41 , 1 141 ,37 123R 165 252 141 ii 
i>'TH 1 5S -56.8.84.2.1. 128. 11 "-.24, ) 75 87-158.20!.! ..?CS- 3.32,137 
JRTR156. 52-226- 133 32 . 28:3- 280. 76 2'2- 203 ■ 234 . 234,32,83,200, 173,21 
Iu-|TM2iJ3 281 - 1 58- 203, 8. 7,>, 50- 805- 16:'. 0.1 41, UB. 157, 173, 141, 2, 281 
I.HT82-208- 3.76 ,236-19- 163 . 2«', 501 ..-8.208, 1 . 0- .:j4 . 234, 2 34.234 
DRTFl2'54,2.34.254.2 84-234 2.34 . 234 , 224 - 824.334 . 7-. 56 . 15?. ,'6 -56. 199 - 76 
rtSTH'ifi. 19^.-234 334.734 . 234 . 2"-;J . 784 . 3.34 , 254 , 3:-:4 . 175. IBS. 157,201.1 .248 
DRTR1,36,234,234.234.234, 173, 153, 157^291 .8- 208.1,96, 233, 123, 141 
MTH158,157 32- 227, 3f>8, 173. 8!, 308, 2.37. 133, 13.M41. 21 208.56 234 ; _j, ; 
DRTR101, 134. 159-?, 141, 15-208, 178- 158:, 157,234.854 38,18, ,201.32,76 
f,5-"ri2^--.!- : 2-^.18-.248.7.5. ;33-,M * - -W 

DHTP241-17V 138 :37 3, 8-. '■ i . - ! 4 1 . !>*S - ! 57, 1 75 . Vi ■ 288 . 9 817,41 
DfETn217-14: 13.2-3- ;72-5-- 235 14! 3.. 298, i 7 2- - 23- - 558 ■ 1 4 1 . 30. 208,36 
13137323 L224 2 5- 2 74 2 73- 15.3. 13.7,3 8- 4 I 8. 1-il. 3- !.53. 14 1.153.157 
CflTR173, 30 208.381 808 ! :-6. 284 . i 2v, 202-1 3 141 ■ 5-3 ■ 1 57. 201 - 1 30 
PO-H205.5. 14! - 138 157 801 1.32-803-3 14! 138 !-,; 281 !-■•:.. 208,3. 141 
[iflTF-1153. 157-201 ■ 144 288,5. 141. 153, 157, 20 1,160 -206 -3, 141 .159,157,201 
IiRTtffiS.208 5 14! -2, 135.20! ■.;?■ 25« ..:.- .■:■■ !25..;3!.-5.20S.8 

DRTR141, 2. 158.281 72,233 ■ 3, . 141 -2- 153,201-30.205 ■ 3 i .11,2, 158 
. .1 ■ i ,■■' 

DRTR30,203, 183.252 38 8,0 5. ■ !5-tf- 0-0,0, 0.0,6 

-■:3|.-.-. 

DflTfl0,B,126,0O 8.0.0.8 0.0,0,0,0,0.0 
[|RTR0.0.O.O-O,0,O 8.13.0.0.0,0.0,0,0,0 

DflTR233,3.4 173.?. 4, 28 1 . lh£.tW-Z 2 3-5, 3 ■ 4, 1625- 1 76- 141 ,9 
DRTR4. 173, 8, 4- 801.15.'. 205-5 )39. i 76, 141 .y 4.253,7,4,173 
DRTfiiSS, 157, 96, 8, 8.0, 0,0, 0,0. 0,0,0,0,63. 0,0 
55T868-8 5- 835 0,2,221 1?2 .5, 221 . 192 255 0,0,60,0 
DRTR0, 170,0. 0.178 3.2,173, 1 1 1 1 - 2,130 

DRTR12S, 2,12S0.!2S.O- 120.0.0,130.0-0 0.0,0,8,0,0 



3.0 105 175,141 141. 196. 141 ,142, 



ii0r5!431->, 14! - S-15. 196 163,4 :41 -15- 80S 23 J 854 334 2-4 234 22 



I..8133 ■■..!■!■.. ■ ■ ■ 14) 246. >>2. 16.- 20: 13 



56 141-148.136.141 



247.802 - HV 



,1,H: 



1 1 350 
1 1 8:6.0 

11870 



11900 

11910 
11980 
11950 
1 1 948 



11590 
! 23100 
:50!0 
12028 
12038 
12043 
18075 

;.. ■ 

■ 2!:*<s 
12398 
12;86J 
12110 
18180 
12130 
18148 
13150 
181c0 
12170 
1 8 1 !'!'.' 
!8> 3-0 
I 350:' 
122(0 
12228 
122 38 
! 2240 
!,:2::0 
12260 
12870 1 

12290 

12535 
12310 



IWTfJiSJ 2 58-85.229.32 '5.20" -84.234 !",. 38. 808-9 04 
DhTi3!41 .30.305. 162.0 139-244 201.157048 „38 224 63 803 845 1 "3: 
2i:-:r.i!5: : .: 2 08 8 !.-.' 4! 127.14: 2i-27:i 173 254 7.5 132 41, 192, 141 
EIP.T0254, 7, 173, 57.205 3.5 41 5-14 1 3" 508 173 88.208.41 -t. 
EIRTR9.6.14I 35 208l,'5-45 ,208 - 5 1-4! I-141-45 203,162-0 
I-r : :03i88 2487 9. 13341 .155. 157.248. 7 _ 52 - 224 2.-288-241 168 
IiRTRlS9,192,l?3.l57.£4-43-232-284 63- 203, 2«5 168 8-183-64,201.157 
tiMT9J38 4:-: 8-3. ,-24. 62 2^3 245 834 173 46. 20ft. 9. 7,41 .7-141.46 
IiflTfi^OS.-s, 194-41 . 194 111. 255.7, 96 173 58. 3031.3 .0-41 , 9, 141 
DRTR1. 212-14). 15 208 162-255 232 160 233 156 173: 4 ■ .380 . 141 . 854 . 7 
H3TR192, 0-203,243-224. 0.208-833. 883. 87 4.834 524. 551 ,' 34-234, 96 
DRTR175 21 -808.257.8 158, 141 .81 -,?05.7-. 52 202-2- 133 - 14! , 21 -298 
.1 Hi4l II.3.O0 175 2. 158201 - - 208 3 ■ 2v 5 r . ;,iif: 1 ,-.*■ :-: ]4i 31-197.14! 
'■ DOl 035. 1973 32- 80 - 195 2 34 ,/34 22 31- 197- 32-74 - 203 - 173,31,197.9 
i DRTR57-41, 57. 141-51 19,5141.3:;. 197 206.252,157.173 252- 157.281 . 
3 DRTR240, 3.76- r=3 1?5 ■ 3.i ■! 72- 207 234 7.34 . 162- 0. 139 . 124 l'=-6, 157. 2:39 
.1 ['0105. 3-i,' 224,9 2B8 245- 238 858 15" l-i-2 0173 252 157 157 257 217 
3 38TH238 884 12 303 245 -2 81 153.38 51 19? 52.81 ■ 19?. 1 75, 1 .220 
3 IlfiT*4t 16 141- I 220-173 1 .2280-4! . 16 201 16 240 2:. 76-286- 194 
3 nflTfri69-l 141 107 154 J8.181 15- '6.165 205 12^5 76,165 208. 255. 255 
:< i:0TR.;;53-835-253. 855-255,255 235 .25= 5 8,842- 202-21^, 835 ,8v3 :16-L37 
J DRTR141 .3, 255 363-1 .155 25= ,.55 127.1250 8,127, 1!9 119-113 119 
3 DRTR119. 119,119- 127. 119, 113- 12'-- [27-113, 115127 127 6400. 187.0 
3 DfiTRO 119,0 !2" 127 127 5.119 [?'>. 00 127.43,115,0 
3 DRTR119,n? 119 O- 80-0-113 115 11- 1158 O-O 0-0 119 
3 DRTR177- 113-11? 127, 127,11?. 119 11? 187. 8 3-58.0 118127 1.27 
- DhTh!2' 3A2' 201 ! 208 10 9.195.41,195.14! 748. 7 . 1 73 - 158, 157 
DRTM20! 2 333 I 3 5. 155.4! - 155 !4! -248- 7. ; 73 i 58 !57 2m I 4 - 233 
l.wTHIO ■-. 19541, 195.141 8507 i; -,.j^ 157-201-8,208.10,9,195 
HRTR41 !35, 141. 251 7.173.153,157.201.16 20810-3 135 41-195,141 
riHTR85.8. 7.173 158- 157.201 ■ 33 208 . ! .-i . 195 4 1 . 135 . 141. . 253,7, 32 
ri!5TH!01,!94 834.254.254 52-21 ! 99 - 96 . . 6 . 1 45 255 255-72-255,255 
DfiTfll. 162,0 189,207,204- 157 . !52 . 43 . 833 224,6-1 80:5. 843 ,9o, 162,0 
DfiTR169,l,15r.3?.208 2.52 - 224 6 233 24636 31.199,96.0,8,3 
DRTR0, 0,0, 8,8. 0,0.0. 24. 0.0, 124.0. 12,254,43,57 

Wm255 23-111-25".. 84,5. 507 553-81i 11 859 222-31-854.242,127,90,126 
r.'ilm855.853 258 153 2.7i-2V. 50-95 889 15 94 11-207 255 851.110.211 
IiNTil246.68 12.5.28, 1260, 4;..! 3 , 2± 0,0,16,0.0,0.0,0 
Ii[5!TR0.0.0.O.(> 0.0.0 888 : ■■':■: -884. 833 158-304.173,193 
linTi3884,20l 41.-6 5 38 8''-l 806 76.185 195.16? 36 . 141 , 246, 202 - 169 
DRTR194, 14 1,847. 202 16? !■ 141 . 1-3. 204, 16?. 27. 141,71 . 199. 141 .75,139 
DPTH169, 355- 141 - 105. 1?>; 1.65.3 141 105.139 !6? 858141 97.-195 ,733 713 
IifiTfilSS 175.8I8-!58,801 8.840 ■ -6.1??. 155 !(j5 l?£ . 141 . 246 . 202 168 
IiFiTRl-5'3 141 -247- 588- 163 3. 32 248. 1?2- "- 145. 152 178-21,268 
I':8T,520i 132 240 3. 76- 742 ■ 152. : 63 ■ 5 135 7, 4- 157. 141- 196- 202, 224 

24! :- 808 152 2 2'5 602-82 
DRTR21.199224-0 208 248 169-5.141-246 202. 162- 207 - 14 ! . 247 2:02 234 
5 DRTR169.27 141 : 7 . 888 238 48 ,85 ■ 833. 45 .205 25.: 234.234 234,163,135 
' !;>370!-:i .53 133 152.1! 202 32 L27 281 . 224 ■ 8-205 245 172-27 4 |4! 
HRTR16S-2, 76.236. 194 5- 20, 15,36. 16 15. 21. 13,33,22,15,21 
4>flTRl?.255.255 255 - .535 . 251; 235. 2^. 855 582 2^, 853 855 855855 255 85 
iJ|--iT|-|233 855,835 255 . 853 . 25:2, ,155 . 232 : - 22:5 . 255 255.255-255.255-0,0,8 
DRTR0.O 0.8-0 0..;i 3.0.0,0 5 0.0.0.0,9 
DR12R0.O 8.0.0 00 8.0,0.0.0.0.3,8.0,0 
.'.■l'jlH'3, 0.13,0 0.0.O.0.0 0.0.0.0.0,0.8,0 
HflTRO, 0.0,0-00 0.0 165. 57 141,31.197.141,33 
BRTR197. 96. 8,0 O.O. 0-0. 0,0. 00. 0,0, 0,0,0 
DOT.i0.0.0 O-O 0.32.21,199.32.21.199.32,21.199.32,21 
DRTR199, 32,21. 139 32.21.139 5,3,?! 159 ■ 57- 21 . 1 99, 52 - 2i ■ 199.-32 
VI8T351 [99- 7!. '--.:2.=l-!37.:3.5i, 199,38-31 ■ V J :■■:>, .7,1 ■ i-j'j 

l'l':32,.-:l 19--82.21.133 5281. !5952,21 )99. .33.21 ■ 199.32,21 
:..,,,.. 15-1.. 58- 51, 199- 32- 21. 195. 53 -51. 159- 52, 2:. 195, 57 21.139.32 
1I5702I !-3 3:,.. 2 I - 135.-5?. 7i- 1515 ■ 22. 21 . 193.. 2-2- 21, 199, 32 . 21 .. 199 
.„.,.. 1 r... : : 159 : . !. . 1 5' . : .■'■ 153 ' '■ ! i " :- ; ' .'1 

8/1. :. ,-i i99.'-i ,-, ■ ,■' : '. ■' 5. ■-■■ - "'' 

38T5.-;/. -2-55. 1155. 8:.-. :,55 . .555 ■ :.i =.25 833 j.= --' 3 :41 183 !59,7'2i:-;-6i 

DRTR153,173.-' ■ '."■-, 251 .2 845, 1 -56 163.32 1-51 -40,136,141,42,196 
196. 14 1.0, n.O -2- 170. 123,10,0.--"" " ■ ' 



"136,35,125 200.158 255 ■ ,68, '28 - 6 



.-. 168 ! 



IlRTP.2i5.226 153.217.256, 155.255,826- 1 22 ,255, 165.-35. 125 . 209,34,35. 136 
DRTR8, 170,32,3,0.32.2, 178, 128,8,0,0,0,0,0.0.8 
T1S1T35. LI-. 173.57..4 238, !8! 194, 172- 171 ■ 194.-28: 2..:40 !-5£.169 
IIRTR108, 141,246,202, 163. 257- l-:i 247- 282, 169,0-141 .13! ■ ! 94 .96, 113. 1 19 
TOTR0. 3,0. 0,0. 0.0, 0,0. 8.5 60. 0,0, 215, 0,2 

- ■■ " 128,65,2 



12330 TJRTR130, 
12349 

12353 



DFITR0, 0.0, 9.0, 9, 9,0, 0,0. 0,8. 8.0. 0,0. 3 
Wp' 140.0,0, 0,0, 9, 0,0. 0.0. 8, 9,9. 0,0. 0-0 

53,10:65 55- 141.82 135. 165 . 195 - 142 , 254, 7, 36.8,235. 255.255 . 283 .,:, 
BfiTR255,251. 555- 128.0.255 177- '56- 255 -3,0- ', 255,255 ■ 0,255 . 2;.5 
LiFlifif-i. I-"-;'! 2:7. 255 . 235 ■ 8;3, 253. 233 ■ 0, 152,8, 133,255, 3,0,255,9 
rrf[Tn853,255,255.255.235.8.247.24 7 7 . 235, 255, 255, 7,3. 1 -8,8 
r>i=iTi5-5i :25'i 2^2 255-35.3.255 255 . 255, '.5"-. 255, -36 .0,255,0,3, 8, 



10.000 



FX702P 



Malchanceux de naissance et victimes incurables de 
hasards malheureux, ce jeu n'est pas pour vpus. 

Philippe MARCHAND 
Mode d'emploi: 

Ce jeu est prevu pour 6 joueurs et la partie est gagnee e 10 000 
points Lancez vos 6 des en appuyant sur one louche Affictiage 
des des ainsi que voire store, puis te nombre de des relances si 
vous repondez O (mais vous pouvez dire Non) 1 
TOT signitie total des points acquis lors dun tour par un joueur 
Decompte des points. 
1,2,3.4,5,6. ■ 3.000 points 

3 paires (22, 44, 66) = 1500 points 

1 brelan (3, 3. 3) = 300 points 

1 brelan d'As = 1000 points 

Le 1 = 100 points 

Le 5 =50 points 



! S=31SWIBKI!a 
tit- PHILIPPE" 

; iff, is48:asn 

W» !=» 10 '■ 

91PRI VnHEZT 
I 
5 FST CSP 5:" J03 

E!«3:!»P3 
1! WtlUF J>6i-I= 

1 

n ppt csp, s;"WE 

UP "SJKKMKH 

fill 8:1=816=9 

If FO! 1=8 T8 181P 



Rl ">3iHE?,T I 
19 PPT CSR S;",CES 

28 SSB 488:flR 1=1 
3 TB 8 STEP -li 
P8TCS8 !;",'";: 
»E«T I 

21 POP 1=8 TO 1S1P 
RT CSR l!"<"1i« 
E«l 

22 F88 !=18 TO 8 S 
TEP -11PRT CSR 
IlVliPEUT I 

39 IF C=8 THEN 139 
48 FOP 1=8 TO H 



58 «(I)=I«T (RAN** 

6itl 
52 HEST I 
if FOR M TO 7lfi! 

I)=91HEST I 
71 ESBtOOlIF 6=0! 

T=e:00T8 10 

75 P8T CSR 51E1F1' 

?"16S1 89BHF 

Yt="0" THE* 19 

98 IF 6=8IT=9160TO 

139 
188 T=T*8i60T0 38 
138 KWWOTW 
131 IF B(Jt7);ie888 



ifOR 1=8 TO !8: 
PRT CSR !;">";: 
CiT I 
132 »«1T 281PRT "TO 
T ";Htl»7)iF0R 
1=18 T8 8 STEP 
•UPRTCSP II "< 
'iiffiB I 
148 IF KB THEH 18 
14! PRT "TOTRL" 
145 FOR H=! TO B 
141 MBIT 38 
169 PRT "JOUEUR "!H 
iVfJaWMIf 
H(H=7!'1999BiPR 
T "ffl6KRHT":EHD 

178 NEST fliS=8:T=9i 

SOTO 19 
488 K=81HRIT 28 
588 2S4EVUF 2!='" 

THEH 598 
548 K=6iRET 
699 J=f 
681 FOR 1=18 TO 9 S 

TEP -UPP.T CSR 

l!".";:HEXT I 
685 SSIT 8i»F0« 

V=B TO K-l 



618 IF A'T'Wlil 
c=BWi;iEiv;: 
=8iBia;v;=cii:= 

m 

51] BEST S 

615 IF JiO THEN 698 

616 FOR 1=8 TO H 

617 PRT ««>! 

618 FOR H=8 TO 481 H 
EXT H 

619 HEXT I 

631 FBR 1=8 TO 7UF 

8<I!=9;H(I)=8 

632 HEST I 

635 ll*(t(0*.M< 
11=8 

537 IF K3 THEN 718 

63J IF »,- THEH 66! 

548 IF (8=1: IF 61=2 
!IF R2=3iIF 63= 
4: IF 84=5; IF »5 
=Si6=6t3998HJ=6 

54! IF W THEN 758 

658 IF H4«8:IF S8=fi 
l:IF82=H3;IFa 
4=R5;B=6i6=845 
88:fiST0 758 

658 IF Fi8=!;iF Ri=I 
;IFB2=!i!!=U'3i 



G=8tii?555.: : 
1=9:82=9:6016 7 
88 
578 IF 88>!iIF 88=8 

niFB!=s:5=3- 

3:S=6*!H9tl93>: 

6010 788 
688IF91MI1F Rl=fi 

2! IF 82=93:8=0* 

3:S=6»!»1*I88)1 

68T0 718 
698 IF R2M1IF 82=9 

31IF B3=B4;U=li* 

3:S=Gt(»2*188!: 

68T0 71! 
788 IF «3>l:IF 83=9 

41IF B4=B51»=0« 

3:S=5«R3«199) 
719 FOP 1=9 18 H 
711 IF 9(D=I:L=L*1 

:6=Stl88 

715 IF 9(I!=5:F=F4 

716 IF F>2:F=0 

728 HEXT I:O=0tF*L: 
IF F»e;6=64t58 
!F=8:L=8 

im M-wff wsic a 

6 

768 IF 8=816=8:1=8: 



t=e 

778 F6P 1=6 T9 5:»( 
i)=8:HEST I:BS= 
q 

771 iF [=81«BIT 281 
PRT CSR 51".PER 

mi." 

772 F8R 1=18 TO 8 S 
TEP -UPRT CSR 
I!"="!iHEST 1 

788 0=8!F=8iL=8!RET 

888 «=I!EV!IF 7t=" - 

THEH 388 
819 IF'ftnviIF'ft 

v'H" THEH 898 
815 IF Vt="H"iK=8 
328 RET 

1761 FBR 1=8 TB £-1 

1762 PR! 8(15! 

1763 FOR H=8 TO 158: 
HKTH 

1754 HEXT I • 



La page de programmes de te- 
levision comme prevue, fart 
son entree dans Hebdogiciel 
cette semaine. La page ci- 
nema, prevue egalement, ar- 
rive d'ici deux semaines. Voire 
journal deviant le journal de 
tous les ecrans. 
Comment ? II ne manque plus 
que la telematique ? Chiche I 
Nous ouvrons un serveur d'ici 
fin fevrier I Cochon qui s'en 
dsp'ie I Vous aurez voire ban- 
que de donnees Hebdogiciel et 
votre messagerie accessible 
par modem ou par minitel, et 
comme nous ne faisons hen 
comme les autres, nous ne 
passerons ni par Transpac ni 
par les reseaux Minitel habi- 
tuels. Vous nous appellerez di- 
rectement et gratuitement I 
Mais vous aurez plus de de- 
tails dans quinze jours, proba- 
blement pendant Micro-expo. 
Au fait, n'ayez crainte, les pro- 
grammes pour vos ordinateurs 
restent presents, nous n'ou- 
blions pas qu'ils sont I'objet 
principal de ce journal. Vous 
trouverez d'ailleurs, en plus 
des listings actuels, deux nou- 
veaux ordinateurs dans Heb- 
dogiciel, i'Amslrad et le MSX, 
et ce des le numero 70 Ras- 
sures ? 

Vous vous demandez sans 
doute pourquoi nous en fai- 
sons autant: listings, actuali- 
tes, pours d'assembleur, 
concours, vente de logiclels, 
bande dessinee, page tele, 
page cine et malntenant ce 
projet de telematique. La rai- 
son en est simple: plutflt que 
de faire vivre notre journal 
avec des contrats de publicity 
en rapport avec notre lectorat, 
nous preferons le financer 
avec le fruit de nos efforts, 
c'est a dire les dix francs que 
vous nous donnez chaque se- 
maine. Et pour que vous conti- 
nuiez a nous les donner, ces 
satanes dix francs, il faut bien 
qu'il vous plaise ce satane ca- 
nard. Et Dieu sail que vous 
etes difficiles, satanes lec- 
teurs. 

Gerard CECCALDI 



IL TRICHE 

ET 
IL GAGNE 

Les deux prog ra mm es eiaieni 
presque a esgalitS, le premier 
avail recueilli 930.640 suffra- 
ges el Tieuve Rouge" de Jac- 
ques GIRARD se retrouvalt 
avec 930.627 bulletins de vote 
portant son nom. II ne restait 
plus que deux enveloppes a 
ouvrir, Jacques Girard n'avait 
done plus .aucune chance de 
gagner le concours mensuel 
d'Hebclogiciel. C'etait mal le 
connaitre, la derniere enve- 
loppe contenait 84 bulletins de 
vole favorable au "Fleuve 
rouge" ! Au sacours, branle 
bas de combat, panique a la 
redaction, les pirateurs pira- 
tes I On relit le reglement :".... 
II est fort probable que ceux 
qui participent au concours fe- 
ront voter leur papa, leur 
maman, leur cousins, et la io- 
ta l it 6 de ieurs amis et relations 
pour leur programme. Normal ! 
Mais comme chacun d'eux 
fera la meme chose, cela n'est 
pas bien grave I Toutefois, 
nous n'accepterons que les 
originaux des bulletins de 
vote; pas de photocopies, cela 

serait trop facile I ". Pas 

de confusion possible, II a tri- 
chs, mais les bulletins de vote 
son! des originaux, le regle- 
ment I'y autorise I Jacques Gi- 
rard aagne done les 20.000 
francs du concours mensuel et 
ouvre la voie a une pratique 
que nous vos conselllons for- 
tement d'adopter. Si tous les 
participants aux concours en- 
voient 84 bulletins de vote, il 
leur faudra acheter chacun 84 
hebdo et c'est tout bon pour 
nos ventes ! 



EXL MANOIR 



EXELVISION 



Voici un magnifique jeu d'aventure ou les ma- 
gnifiques qualites sonores et graphiques de cette ma- 
gnifique machine sont mises en magnifique evidence. 
Valery BRUNEL 



A tulvre: 

En raison de la longueur in- 
habituetle du listing nous 
passe rons ce programme 
en 3 fois. 



64 LIEU-1NTRNDCSBH2 

SS IF VCLIELOO* THEN 64 

66 WLIEU1"! 

67 NEXT I 

68 REM «••••»•»«# flRMES ••#•»#» 

69 FOR 1=13 TO 22 

70 LIEU=INTRN[>( 581+2 

71 IF V(LIEU)OB THEN 79 

72 V< LIEU 1=1 

73 VfKLIEU)=INTRNOtVMRXCn) 

74 IF VWLIEUXVMINUITHEN 73 
73 NEXT I 

76 REM »#«»##•«# PRINCESSE IHtt 

77 LrEU-INTRNDf48)+10 

79 IF V.LIEU1O0 THEN 77 
79 VfLIEU>=>60 

90 REN 

91 REN MDMNtt VRLEURS CI VERSES < 

92 REN 

53 LIEU- I 

54 NR-2 

35 F0=INTRND<6)+32 
66 MA«INTRND<SS+30 
B7 FR" INTRUDE 20 J+32 
99 VIE-1100 
89 NH-0 
92 NT=0 

91 PQ«="FIL" 

92 POMt="GJM" 

93 P0MF1«»"HKN" 

94 M0«-"Jd9" 

95 M0Nt-"b»h" 

96 M8N9f****"i" 

97 TRi-"DRU" 
99 TPE«""PSV" 
99 TRE5»"" 



•"VS." 



92 IfcCMRK 95 } 
192 ARMEi-"Z3" 
l<CHM< 96 > 

103 REM 

195 CALL SPEECHC"L,"MJ«> 

104 LOCATE (13, 29) 

ioe print "BvSnfl" 

107 PAUSE 3 

108 CLS "WBW" 

105* REM **«*##»# r>E'i: ; .I>l LHH 
119 CALL COLOR' "IYB" i 
111 LOCATE (2,24' PRINT 
US LOCATE '3. 24) PPINT 
113 LOCATE (4.24) PRINT 



pint -abash c fi^^eaep, R 

PINT ■ C C r r E " 

PINT RBDBR C ABABA ABA" 



! '■':■ Li'CRTE .6,241 ■ 

US LOCATE (7,24! 

1 17 LOCATE '8,24 i 

1 is LOCATE '■ 9.24) I 

119 LOCATE ' 10,54 :■ 

129 LOCATE M-USW 

121 LOCATE ( 12.24) 

I,?;: I.WHTL c 13. 24 > PRINT " C CCtC C" 

j j.;. LOCATE (14-24) PRINT "flBRBBePBDBDBr.e&BA' 

i;--i LOCATE '.15-241 PRINT "C t C A A ABR C" 

!;<:. LOCATE '16.24.1 PRINT "C C C C CC 

126 LOCATE Cl?,241' 

PPINT "A RBBBDBA ABABA C« 

.27 LOCATE '18,24) 



PRINT "C C 

123 LOCATE (19, 2« )■ 
PRINT "A A AE 

129 LOCATE '20.241 
PRIK 



c c 



3CATE (2,34)' 
CALL COLOR( "1WRF" ) PRINT "A" 
i VI REN #tt#ttft*K [JESSIH 

plateau *##«***# 

132 CALL COLORf'BWb") 

133 LOCATE (21,1) PRINT "VIE 

FORCE VIVRES 

FRANCS' " 

134 LOCATE <1,IJ PPINT " ARHES " 

135 LOCATE <IM) PRINT "TPESHRS" 

136 LOCATE (14,1) PPJNT "DESSINS" 
19? LOCATE (1,91 

PPINT " COMMENTAIPES" 
136 LOCATE ( 1,22)- 

PPINT " PLAN DU CHATEAU " 

139 CALL VCHRRC2,8,20,"*","0bU") 

140 CALL VCHflR(2,23,20,"*"."0bU"i 

141 REN KWtlllHHMMt EXPLICATIONS «««*««*« 

142 CRLL AFC'VOUS AVEZ",2> 

143 CALL AF(" ETE INVITE", 31 

144 CALL AFC "CHEZ LE DUC",4) 

145 CALL AFC"D'EXEL.VISI0N",51 

146 CALL RF( "CELUI CI", 7! 
CALL flFf "A UNE FILLE ".9) 

147 CALL AFCFOEPCRA ,.."j91 
MB CRLL flFf "IL VOUS", HI' 

CRLL AFC'FAUDRA ETREM2) 

149 CRLL AF( "UN VALEUREUX" 1 131 
CALL AF( "CHEVALIER.".. 14' 

150 CALL AFC "EN EFFET ",13> 

151 CALL EFF(13> 

152 CALL AF' "POUR", 2)' 
CALL AFf "RPPPECIEP",3) 
CALL flFC"V0TRE".4) 

153 CALL RF("BRAV0UPE,",5)' 
CALL. AFC-FLLE VOUS". 6 > 

154 CALL AF("fl9RND0NNERfl".71' 
CALL AFf "DANS LE",9) 

155 CRLL RFC "SOUS-SOL DU",9> 
CALL AFCDU CHATERIJ.",10) 

156 CALL RFC'QUflND V0US",12) 
CALL AFf "AUREZ'MSl' 
CALL flFf "RMMASSE", 141 

157 CRLL AFC "4 TRE30RS ETM5' 
CALL RFC'DEJOUE T0US",16) 

153 CALL flFf "LES'PIEGES",17> 

159 CALL 6FFU3) 

160 CALL AFf'VOUS PCUPPEZ",2) 
CALL AFC'DEVENIR S0N",3> 

161 CALL AFf "EP0UX.",4> 

162 CALL RFCMRIS AVRNT",6) 
CRLL RFC'DE PARTIR R",7) 

163 CRLL AF' "L' AVENTURE", 3 > 
CALL flFC'ELLE V0US".9> 

154 CALL AFf "FRIT DON", 13) | 
CALL RFC'D'UN SHC'MI J 

165 CALL RF'"C0NTENRNT",12) 

166 CALL RF'STR.<FO>&" POINTS DE".13' 
CALL AFf "FORCE , "ISTF.r MR ) . 14 ) 

167 CRLL AF' "DE VIVPES" 15' 

CALL RFC'ET "&STRK FR)*" FRANCS". IS? 
16B CRLL SCfVIE.FD,MR,FR) 
169 PAUSE 3 CALL AF' "BONNE CHANCE I " IB) 

CALL EFFC13) 



SUITE DUN' 67 




175 PRUSE 1 

176 IF KK=0 THEN 195 

177 N=9 M»="" CALL EFFf9? 

179 VIE-VIE-CINTRNOf 18>+1B+WWZ) 

179 MA-MA- 1 

199 CALL SCCVIE.FO.MR.FR) 

191 IF VIE<1 OR Mflcl OR F0<1 THEN 666 

182 IF VIEf.70 THEN CALL V1E<VI£) 

133 IF F0<5 THEN CALL FOfFOl 

184 IF MR<5 THEN CRLL MA(MA) 

1B5 IF SfLIEU)<>0 THEN M-M+IttB-MM," S' 

196 IF OfLIEUX>0 THEN M»M+1 i l«-M»».° 0" 

187 IF EfLIEU)f>0 THEN H-M+I fM-Mig," E" 

188 IF NfLIEU)f>0 THEN M-M+l M«=M«»:" N" 
199 KK-1 

199 IF MM THEN CALL AFfSTRSfMM," 

SORTIES", 2) CRLL AF(M«-3p GOTO 196 

191 CRLL AFC "UNE SEULE".2> 

192 CALL RFC"S0RTIE"!.M».3) 

193 REM 

194 rem HHHHHHM DIRECTION WWMHMHHHt* 

195 REM 

196 CRLL KEV1CDIP.TT. IF TT=0 THEN 196 

197 IF DIR=12S OP MR*7S THEN 208 
19R IF DIR=130 OR PIR-93 THEN 213 
,99 if DIP-131 OP DIP-79 THEN 216 
290 IF DIP-129 OR D1P=?9 THEN 203 

201 CiOTO 196 

202 REM »##«#»•««*»» EST tt..»»»«»»*»*«i 

203 IF E(LIEU>=8 THEN 196 

204 CRLL vLA'-'AfLIEU'. .fAf LIEUJT= ■ 
LIEU=E(LIEU) 

20^ r-RLL CLI'VH'LIEU' :-'A'LIEUJ> 

;'■!?'. COTO 22? 

207 REM ####«»#*#### NORD »*«»#**«»*«»« 

299 IF NfLIEU'»0 THEJJ 196 

209 CRLL -VLR(YAfLIEiJ)XA(LIEU>) 

LIELl-HfLIEU) 

21A CALL CLKVA'LIEUl.XACHEU)) 

211 GOTO 235 

212 REM ####MIMIItm BWh *t*#****»»ll#lttl 

213 IF SfLIEU)a0 THEN 19S 

214 CALL '■/LACVA'LIEUl.MHfLIEU)) 
LIEU-SfLIEU' 

215 CRLL CLIfYAfLlEU).XAfLIEU)) 

216 GOTO 225 

217 pen #«#*«**•»»» BUEST MNMI ** I WHHMM 
.?)■■: IF n, L ieu.>=g THEN 196 

219 CBLL VLA'VP-LIEU ' "H'LtEU" 

LIEU=Ci'LIEU' 
:T20 CBll Cl I'VA'LIEU ' MA'HEID) 



283 CV=CV-4S 

284 IF CV»MB OP CV< 1 THEN 282 

285 VfLIEU>FFIfCV'' 
2B6 FP=FR*FB<CVJ 

287 CRLL EFF(9) 

288 CALL AFf "VOUS P0SE2",4) 

289 CALL AF. -CCr-CC "07GE",5i PAUSE 1 
CALL RFfRR*fFR(CV)),8) 

290 CRLL "r/ './nus PECEVEZ", II J : 
CALL AFC5TR»fFBfCV>>!," FPS",I2) 

291 VWLIEU)=FB(CV1 

292 FOR 1=CV*1 TO MA FA' 1-1 i*FA( I 1 
FBf I-1)"FEK1 'NEXT 

293 FOJf 1-2 TO 7 CALL AFBf " ",1' 
NEXT 

294 NR=NR-1 FOR I=! TO Hfl CRLL RFB'RR*' 
FfKI)).I*I ) NEXT 

295 GOTO 279 

296 REM 

297 REM «•«*»* PPE«E"CE MONSTRE «»•••»• 



*-l 
! .3 



270 CALL BR"VOJ3 P05SEPEI" 14> 
CALL AFC'MHIMTENANT" 15> 

271 PAUSE .9 

272 CALL RF'STP*fFP?t," FRANCS" ■ 16 

273 PAUSE 4 

274 GOTO 173 

275 CALL EFF' 1 - 

276 TALL BFC "CHBISISSEZ "-if FflUSI 

277 FOP H=l TO Hfl 

37A CALL AF'" ■'¥STP»'FBfH 

27f LOCATE fH*3,9'' PPINT STP*'H)- 

l AP«' FAf H " 
2R0 PAUSE .3 
281 NEXT H 
232 CALL KEVKCVJO IF ir=9 Then 



* VGcIHTRNEKVWAXf JH)-VMINf JH)>* 

VMIN'JH) 
1 CALL EFF(9> 
; CALL AF'-ATTEMTI0Ni".4! PAUSE 1 

TRLL RFf "UN", 7) CLL AFf PPV JH>.8) 
>. CALL AFf [>E ^ORCE "*STR*C<ffi>/g> 
1 TALL RFC-LE COMBRTTEZ'M«' 

CALL AFf -VOUS". 11' 
J CALL flF("f0»NON 1=0UI>",12) 
; CALL kE¥l(CC,TT>IF TT-0 THEN 306 
' IF CC=49 THEN 326 
! IF CC=4H THEN 311 
> GOTO 305 

J REM MHHHM COMPRT HON ACCFPTE ##### 
1 IF INTRHr3'10H'7 THEN 319 
? REM «*#** LE MON^TpE ATTAOUE #####» 
; F0=F0-\ff;y2 TALL EFFf0> 

CALL RFfLE MONSTRE-,3)' 

CALL AFf "ftTTftOUE" . 4 > 
» CALL flFf-vO'JS PERDEZ"7) 

CRL.L flFf STR*f INT' VG/2)>j, 

" POINTS". B) 
5 CALL RF' -FORCE" 9' 
S PAUSE 2 
7 GOTO ITS 
S PEN «*## PAS P'ATTHQUE 

MONSTPE #### 
9 CRLL EFFfS) 
(I CALL AFf "IL VOUS". 31 

TALL AFf "LMSSE".4' 

CALL AF'-TRAN0UILLE*.5> 



CALL AFC'C'EST F1NI»",8) 
' CALL RFC'VOS FORCES ET'Mfl) CALL AFf "VOS 

RE5ERVES" . 1 1 > 
1 CALL RFC'DE VIVRES", 12' CALL AFf "OUT", 13 J CRLL 

RFf "AUGMENTE DEM4) 
9 CALL pFfSTPS' £".-*■■ PPENTS".. 15> 
3 F0-FO*PR 
1 MH-MA*PR 
I FR-FR-PB 
3 VIE-VIE*70 
» CRLL SCfVIEFfj.MA.FR) 
5 V<LIEU)«e 
$ PAUSE 5 GOTO 173 
7 REM 

3 REM MMMM PRESENCE ARGENT ««*##«« 
9 REM 
3 PRbJNTRNPC VMRXf Vf LIEU '• :-VMIH' •■!■■ LIE 1 .! .:• > .*VMIN< v-'C 

LIEU>> 

1 CALL EFFf0)CRLL RFf "VOUS AVE2 DE".4)CALL RFC" 
LA CHANCE", 6 J 

2 PAU5E .9 

3 CHLL AFC'IL Y A", 91 CALL AFf "UNE "«,ARiC Vf LIEU 1 1 
19 > 

4 CALL RFC'DE "tSTRtCPR >V FPANCS". 1 1 ) CALL RFC" 
VOL'S LA". 12) 

5 CALL AFf "PRENEZ'".13> 

5 CRLL AF'"(0=NON 1=0UI'".-14) 

7 CRLL tCEYKCCTTl IF TT=0 THEN 407 

3 CRLL SPEECH' "L"iTIC«l 

9 IF CC"4B THEN CALL RFC'TRNT flS<",lS3 PRUSE I 

GOTO 173 
3 IF CC=49 THEN 411 ELSE 407 

1 CALL EFFf.5' CALL AFf "D' ACCORD' " .4 ) PAUSE .9 
CALL AFi-'-vnuS P0SSEDEZ",6) 

2 FR-FP+PP 

3 CALL AF("MflINTENRNT"-7) CRLL RFC STRS'FR)?." 
FRANCS". 8> 

4 V'LIEU)=0 CALL SCfVIE FO MA . FP ' PRUSE ? GOTO 17: 

5 REM 

S REM #####* PRESENCE TPESOR *###»»•» 
7 REM 

3 PR-INTRNP' VMF«' ■" LIF'J ■ ''-vr-UN' V I. IFU ' ' '*VMINf Vf 
LIEU" 

CRLL AFCOUFLLf CHANCE '"■ 5 ' ■ PAUSE . 
IS TFTTF".?' 

) CALL RFC "UN "S,APS'V( 



) CALL EFF' 

CALL RF("_ _ 
? CRLL flFf "SRLLE U 

LIEU))..?' 
I CALL AFC'IL COLITE"10) CALL AFC S' 
? CRLL HFf "FRflNC3",121 
3 GOSUB 656 
» IF 2«I THEN 173 
; FP-FP-PR 



O.ll) 



.;.-■? RE'- S = *4. = = HfiMi. ■■IF PIECE «tttttttt*tttt 326 

224 REM 

225 CALL POMMEI'V- - \ IEU PO«-POr» 327 
POMM» 1 

£2C CHLL M>:»I:.1FTV '. '■ NljS MMHS "DHS» ■ 1& 

22' ''ALL APME^-1"" l.LIEURR*.APM». T2? 

FUMES ) 33B 

255 CALL TBESCP !■"./' ■ LIEU TPt.TPGS- 331 

TRES* ) 
229 IF V(LIEU'=0 THEN 239 

tit IF WLIEUXS then BflU POfWEl'V '■ 

LIEU.PO* POM* POMM«' ELSE 232 
231 GOTO 376 

238 IF WUEUX9 THEN CRLL TRESORKV '- 
LIEU TPS.TPE* TRES*' ELSE 234 

2?3 GOTO 397 

234 IF VCLIEUK13 THEN CftLL TPFSnPl=: v< ' 

LIEU.TPI TPE*,TRE?.*^ ELSE 236 
333 GOTO 41? 

236 IF VLIEUV23 THEN CBLL flRMESl'V ■ 
LIEUPPtflRm-ARHE*' ELSE 238 

237 GOTO 434 
2T8 IF VCLJEU5-W THEN 455 

239 DA=IMTPNO 1W> 
249 IF BOMS THEN CflUL Hr JN"TP£l't>A.MO>- 

KNI . M8NS* ' ELSE GOTO 243 

241 GOTO 2'?* 

242 REM tWHUtMM SALLE WIDE ««#*#** 

243 CALL EFFf0) 

244 CRLL AFf "LA SALLE". 5) 
CALL AF'"EST 'MDE'.S' 

245 PAUSE 1 

246 IF NA-i? OP HP-2 THEN NP=1 
PAUSE 1 CRLL EFF-0' GOTO 173 

247 NP=2 

248 CV=2 
-J-' rpsL. AF' ■. , 0'. l Lt;-'■'':■_■:'■ ■ i: 

CRLL AF' "POSER UNE" 12' 
25P CRLL AF' "APHE?".13} 

CALL AF' "£M ECHAHGE".16> 
25! CALL RFf'0*NON 1-0UI)".14> 
252 CALL RFC 1 VOUS RECEVRE2" . 17' 

rpii l AF- "UNE M.iMME-.lf' 
252 CALL AFC'P ARGENT", 19) 

254 CALL KEYKCC.TT) IF TT=S THEN 2^4 

255 IF CC=49 THEN 173 

256 IF CC=49 THEN 258 ELSE 254 

257 REM Mttfl M POSE D-RPME iUHMMNHttM 

258 CRLL EFFfO) 

259 IF NR-1 THEN CALL RF' -VOUS POSE?- 
41 ELSE 275 

268 VfLIEUl-Fflfl) 

261 VflfLlEU'=FB'l > 

262 CRLL AF.'":ONC '.t.ts'F " . «■ : FqijSE I 
CALL RFCRR*fFA(ll),8) 

263 PAUSE 1 

264 CALL RFBf" ".2) 

265 CBLL SPEECH' "L "STIC*' 
;>-{. fp.'.i'.f .6 FP=FP+F6f 1 i 
267 CflLL AFf'VOUS PECEVEZ'Ml' 

CALL AFfSTR»'FBf 1H(-* FPS".12) 



PRUSE 2 


427 CRLL AFB'flRS'V'LIEU'i NT*9> 






REM 


429 CALL EFFf31CRLL AFC'VOUS RVEZ" 6J CRLL RF' "LES 








4-^i* TALL RF'"ET VO"S P0UVE2".S) CALL. AFC'DONC ALLEP 






















rflLL RF''-1..SRNS PPMC"- a PRUSE 1 




FflR H=l TO NB 


475 PEM *##*•»## PRESENCE APMF *****### 


CALL RFC' '■ISTRICFEI'H'i?-' 


436 REM 



r=9 THEN 335 



\ LOCATE 'H*8 9' I 
(.ARS'FA'H') 

; PAUSE 1 
i NBKT H 

J CflLL KEVICKE ST 

5 KE=KE-4S 

f IF KE'l THEN 335 

t IF 1-E>H THEN 333 

? IF KE=1 then 341 ELSE 346 

) REM H#1M*# R MBIHS HUES »|HIW | I| 

I FC=VG-'IMT(Fnyie>. if ?r'2 THEN FC=2 

; FF=!HTPHD'12'*4 

J IF FC<0 THEN FC=0 

1 GOTO 348 

? PEN iMMMNMM RVEC flBCS * *» »#*#*# 

i FC=INT'VG-*IHT'Frj.lO lWFBfKE-1 >'2" 

' FF=FPf KE- 1 ' 

i CRLL RFf "ENJEU", 15> 

CALL RFC'DU COMBRT -161 ROUSE 1 
1 CflLL AF< 3TP*' FC '! " POINTS" 18' 
? PHUSE 1 
| 50PTbFF-V5 
? D]^-INTRNt"4)+2 
1 FOR ■ft'l TO 7 CALL SPEECH'"L "*0»' 

PAUSE . 15 NEXT YV 

4 IF SORT>DI THEN 368 

5 IF SORT=DI THEN 366 

6 CALL EFF'O' CflLL AFC'IL VOUS A". 4) 
CALL HF'"BATTU'-.6> FO=FO-FC 

7 IF KE=1 OR Nft=8 THEN PAUSE 2 
GOTO 173 

9 CALL AF' 

CALL OFC'VOTRE". 

CRLL AF'flR«'FR(KE-l ",13> 
9 PAUSE 1 CflLL SPEECH"T,"S,TICV< 

1 FOR 1=2 TO 7 
CRLL AFBf" -■ I) NEXT 

2 FOR I-KE TO NA FRf 1-1 )=FR' I ' 
FB<l-ll=FBf 1' NEXT 

3 NB-Nft-1 FOP !>1 TO Hfi 
CALL AFB/«R»'FA' I ".1 + 1 1 NEXT 

'A PAUSE 4 
15 GOTO 173 
K CHLL EFFC3' CRL-L BR M 2MT" 

CALL RFC' II "' 
■7 GOTO 173 
B CRLL EFF'R) CflLL HFC'BPRVO VOUS". 4) 

CBLL flFC'L'flVEZ BRTTU-.61 
9 FO-FO*FC 
9 VIE"VIE+INTPNP'10>*5 

1 PAUSE 2 

2 GOTO 173 



3 CALL EFF(0) 

) CALL flFC'DRNS CETTE". 3) 

) CALL AF' "SALLE". 4' CRLL AF' 

ONE RPME".6) 
I PAUSE 1 CRLL AF' "CFST ONE' 



LIFU-. 



V H"(S?iC"U AF 
CALL AFf.AR«fVf 
MHIS VOUS RVE2"_, 



i: PP.EHP" 



2 IF Nfl=6 THEN CALL 
IS' ELSE 444 

3 CALL RFC'RSSEZ rj'HPMr S ',n3 GOTO 173 

i CALL HF'"ELI.E CO-.ITE" ini CALL RF' STPK PPit" 

FRANCS" ,11? 
5 CALL AFC'Sfl VALEL'P EST", 12) CRLL AF<STRB'Vfl( 

LieUJM," POINTS". 13' 
S GOSUB 656 
' IF Z'\ THEN 173 
; Nfl=NA+l 
3 FR-FR-PP 
? FR'NR '=V< LIEU) 
1 FEl'NA >=VA(LIEIJ> 
; CflLL HFKBRW VI IEU".NR-H1 
y VCLIEUl-9 
» PAUSE 2 GOTO 173 
5 REM 

5 PEn mm*** presence pplncessf #»»#)(# 
7 REM 

3 CRLL SPEECHf "L,"e.W«l 
9 CALL EFFC0) CRLL RFC'VO'JS ETES DANS".2'^ 

CALL AF' "LA CHAMAPE PE".3 5 
3 CALL AFC'LR PRINCESSE" 41 PRUSE 3 ■ CRLL AF' "SI 

VOUS M'AVEZ".7) 

1 CALL flFf "LES 4 TRESOPS"..?' 
CflLL RFC'VOUS AVEZ 2", 91 

2 F«=CHR»CIHTPN[>(9)+48) 

3 rflLL AFC'SECONDES POUR "10' CHLL flF'"RPPUYER 
SUP" 11' 



• PRUSE 2 



374 REM §#«»##* ( 



VITRILLEMENT t 



5 CflLL EFFfg) 

T CALL AFC'HH' HBI...",3; PAUSE .5 

3 CALL flFf "IL Y A ICI".4> 

CALL AFt-DE OUOI V0US"-3) 
9 CALL RFfRflVITAILLER'"?' PAUSE .4 
i CALL AFC'C'EST UN". 9' 

CALL AF'flR«(V'LIEU>).10) 

1 PRnlNTRNPf "MR'" :.'■■ L IEU ' '- 
VMIMf Vf LIEU ' ' 1+VM1HC V L IEU > 1 

2 CflLL HFf-IL COUTE'Ml ' 

CALL RF'STP*'PP '*" FPRMCS" 12> 

3 GOSUB 656 

4 IF 2=1 THEM 17"* 

5 CALL EFF' 1 ' 

6 CALL AF'"MANGE2 BIEN'' -fil PAUSF 1 



! CflLL 
) CRLL 

1 CflLL 
? CflLL 
I CflLL 
1 CflLL 
! CALL 
j CALL 
' CflLL 
3 CflLL 
1 CALL 
) CflLL 
1 CALL 
! CflLL 
3 CflLL 
1 CRLL 
I CRLL 
3 CRLL 
' CALL 
1 CALL 
) CflLL 
i CALL 
I CHLL 
3 CflLL 
3 CALL 
t CflLL 



SPEECHC'L,"JW») 

EFFf7' CALL AFC'MfllS VOUS LES". 4' 
AFC'AVEZ ET",5) CALL AF' "LA PRINCESSE". 
AFf "ADMIRE V0TRE".7) 
nFfSJEUSSn-U' ■:;., 
HFf "RPPR0CHE'".1I> 
RF'"BEAU ET".121 
RFf"VALEUREUX".13) 
HF<"CHEVflLIER'M4i 
AFf'VOUS DIT-ELLE" ■!!' 
EFF(7) 

flFC'OUEL COURAGE". 5' 
HFf "IL VOUS H ".61 
AFf'FALLU POUR", 71 
AF("HRRIVER",8) 
fiF<"JOBBU'fl MOI',91 
AFC"AVEC",10) 
HFf "ET",131 

AFfSTRffFO:'?." PTS FORCE", 12.) 
flFfSTRXVIE)!!." PTS VIE". 14' 
EFF'91 CflLL RFC'VOUS". 61 
flFf "L'EMBRASSEZ".9> 
RFf" TENDREMENT..." 101 
EFFf 10) 
RFC "flINSI ",4' 
r-EST PAR". 



:*un i 



IPTHGE nijE'-Bi 



A SU1VRE.. 



KARATE KID 



Defiez loyalement vos amis dans la plus pure tradition 
japonaise. 

Guy MORVAN 
Mode d'emploi 

Combat entre deux joueurs avec mariettas Manette 0, joueur noir 
de gauche. 
Manette 1 joueur rouge de droite. 

I action | 



THOMSON 



Joueur de gauche 


Joueur de droite 


Manette 


Bouton Action 


2 


S 


coup de point a la lace 


Coup de pied a la face 








Coup de point au venire 


Coup de pied au ventre 




7 


3 


Protection du ventre 
Vo U s reculez 










Vous vous baisse2 pour ewer 


Fauchage balayage 




7 


3 




Retourna et coup de pied £ 




8 
1 


2 

1 




Relourne el coup de pied i 
Saul avec coup de pied a 


a 'ace 



■ * * * » * * * 1 • " * * * - ♦ * » " ■- ->9. '■ ■!> ■■ ! 

KARATE kid 

AUTDJP: GUV HURVAN 



.ocHTco.o.atCLS 

SCREEN 0,4.0 

u clear,. 45 

12 CH=aee 

13 till T(l,34) 

14 iTTRB 1,1 

IE ' — GRAPHITES ET VARIABLES 

20 tEFGP*<3..=24.24,72.56,3,24,.44,lB£ 

:i DEfgrs. "- .=-1-3. 72. s, 56.16,128,17,66 

iS. DEFGP*<33' = 0. 126. 126, 5. 34, 9, 84, 

2 7 DEfgp i ■:-?.' =j-;. i: 2,240,840*2.49, U&, 56, 



24 i-tri;r. *■ 40 ■=129, ;29, ;£?. !29. ]2J- 129, It 

9. 129 

2" tF.FGR.i. 1 . = 24, 2-.. 2 0-;, 56, 3. 24.44, 102 

£-. [-EFGRS'41 .=66.90.93. ) 26 . 24. 24. 36 .. 1 02 

30 DEFGR*<2:. = 0. 24. 153.70,36,28,2.1 

72 DEFGR-T. - . = .;4.;4. ;2.5i..230.24,36.l32 

J4 [-efgri. j .=24.26, [2,a4,40,8>22»90 

36 &EFGR»r:5)"0,0, 19, 11,6,13,56,156 

IS DFFGR.f(6-=0.3.3: "U.S. 14,50. 196 

43 DEFGRU7:- = 2J,24,- : >,58.74,28.16,48 
42 DE-FGR*(S; = 0. 134. 79,36, 60.20,13,24 

44 CEFGRpf(9 ' = 0.0,0.53. 63.24.24,48 
4; [-EFGP3; 10i'4:3. 4?. . 2- , 56- 88. 8. 16, 8 

45 DEFGP-i! 11 5 = 0, 0, 192.24 0. 49.48,48,24 

,.:~:,. : . ;-;■:. .7.6. 44,255 

55 DEFGBi.. l.j <=e. 24.25.6, 132,252,2, 1 
60 DEFGR*', 14 '=0,6.6.3,252. 148,18, £4 
65 ['L'FGPi:. 15 . = 2 4, £4. is. £S. 16.24.52. 102 
■'0 [.LrGfiSi !o . = 24.29. 51. 28, 1.1,24,53.102 
75 [■F_l-GF;.;. 17, = 0.43. 1?7, 93. 36 . 56, 64, 128 
ilO L.--GPJ. 13. = 24. as. 4ft, 23, 19,24,36.102 
35 DEFGR*il9>=24, 88, 49,24, £0, 16,56,76 
90 DEFGR*(20>=0, 0,200, 200,96- 176.216,51 
95 DEFGR.K21 i=0- 1?2. 192.120.c4.il 2- :'6. 3/5 
97 DEFGR* <: 36 ' = 4 . 72 , 92-66. I 54, £, 4, 24 
100 r.irGP-.-22. = 24,2-. 144. 22.32.56,8,12 
135 DEFGP*<:23 '=0.9 ■, 99, 7 6, 6 0, 40, 72, £4 
118 DEFGR*(24 . = 0.0.0.76. 60.24,24, 12 
115 DEFGR*-- 25 ■• = 12, 1 2. 24 . 22. 2 6 . 1 a. 3, 16 
120 DEFGR*(26>=8,0,3.15,12, 12,12,24 
125 DEFGR*';2 7;. = i6.66. 16,0, 102,36,52,255 
:-'!-; [■■=TGP$(38> = @.4S. 176.96.33.63,64, 1£8 

135 DEFGRii-29^0.96.56, 16,63,41,72,24 

136 DEFGR*("33)=44. 4 4.3 6. 23. 4, 10,9,27 
!37 DEFGR**: 31 ) = 1 2. 1 2, 4 , 252. 4, 1 0, 9, 27 

138 DEFGR*<32)=8.?. IS, 127. 255. 63, 7. h: I.EF 
GR*(33)=0, 19£,240,£54, 255, £54, 243,0 

139 DEFGR*<34>=0,8.8,56, 196. 9, 9, 0: DEFGRi 
(35 -' = 16. 137. 82. 36. 170. 112. 32, 32 

14u G05UB 15000 

141 N I =0(02=0 

14£ ON Ml+MS+t GOSUB 10000,11003.12600 

144 ATTRE 0,l:COL0P ",4:L0ChT£ 4 . 13: PR I w 

TMl:L0CflTE £0. I3i COLOR 1 . 4 : PRI MT1'IE':C r ■ - . -j t: 

, "tn: mTTRE 1,1 

195 Pl=l:P2=l :-i=10:B = 2:i 6=14:0=21 

! -s COLOR 0(LOCATE A, 8: PRIN T G iV S i i 5 , : COLO 

R l: LOCATE C,l>: PRINTGR*(0> 

2,;.,-. Giy-uE: 99i: COlOS --5:i_:iCATE 30,15:ATT 

p? O,G;PP,INTINT<CH>:C0LOR,NA(ATTRB 1,1:1 

F CHX-.75 THEM BEEP:BEEP:B-£EP:BEEP!BEEF! 

BEEPiFOB U=l TO 10001NEXT usGOSUB 6006 

j..-,s rr.LOP l,4!fiTTRR 0,0(LOCATE 4,15 = pf;in 
TSC1SL0CATE £0,15:PR]NT5C£(PTTRB 1,1 
£10 GOSUB 1999 
228 GOTO200 

998 ' M0UVEMENT5 DU JOUEUR ROUGE 

999 HA = 1 

iiifti-i ." L i" F l.ljp: jij = ::.T:[.Ka>! IF 3 = 1 THEN 

i .-.6hTE :,C.:-R:(i T -JP.riV.:S=0 ELSE IF 00 = 

THEM CH=CH-.£5:RETUPN 

1005 CH-OK-IUF STRIGa; THEN [£00 

1307 IF 00=3 THEN L0CP.TE C.D:PRINT" "K: = 

■-:■<■ l:P£ = l (LOCATE C,D:PRINTGR*<0> : GOSUB 50 

00: RETURN 

1810 IF 00=8 THEN LOCATE C,D:PRIMT" "LG= 

C-llLOCATE CDiCOLOft 1 1 PRI NTGR*a ) I Ft-1 : 

GGSU8 5000:RETURN 

1315 IF 00 = 7 THEN LOCATE C,Di PRINT C= 

■'-l:L0CftTE C,D:C0LOP 1 '• PRI MTGP*' 3 ■■ : P£ = £: 

GOSUB 5000:RETURW 

1020 IF 00 = 6 THEN LOCATE C, DECOLOR I: PRI 

NTGRS..4':P2"3=G0SUB 5000:RETURK 

1030 IF 00=5 THEN LOCATE C,D:COL0R UPRI 

MTGR*' 9;:P2=4!G0SUB 5000tRETURh 

1043 RETURN 

1200 IF 00=3 THEN LOCATE CDiFRIMT C = 

r-i;LuC:nTE C.&! COLOR 1!PRIWTGR*C8;. :F2 = 5: 

GOSUB 5000:RETURN 

1213 IF 00=7 THEN LOCATE C, : PRINT " ":C= 

C-l: LOCATE 0,D:COLOR 1 : PRINTGRIU3! I P£ = 6 

:GOSU6.5000'RETURN 

1££0 IF 00=5 THEN LOCATEC, D: PRINT " ":C= 

C-HLOCATE CDiCOLOR 1 ; PRINTGRJC5; : P£ = 7: 

GOSUB 5000SRETURN 

1,-30 If 00=1 THEN LOCATE C,D:PPIMT" » : ! C 

=6-1: D = D-1 (LOCATE C>D:C0L0R 1 : PRIti ~> ■,:-■ '-! ■ 6 

;r-2^:G0SUB 5000(LOCATE C,D:PRINT D= 

D+l:S = KRETURN 

1£43 IF 00=2 THEN LOCATE C, Di PRI MTQP3' 7 ■ 

i FORU = 1TO50:NEXTU! LOCATEC, D SPRINT C = C 

-l:L0CATE CDtPRINTGRKSXFOR U=lT0i50: N 

E!iTU(P2=9iG0SUB 5008JRETURN 

1250 IF 00"3 THEN LOCATE C,D:PRINTGP= 

■■ FORU=1TO50: NEXTU: LOCATEC, &: PRINT " " : C=C 

-HLOCftTE C,piPRIt»TG?J<M?:FOR U=1TO150 = 

NEXTU:P2H0iGOSUB 5008:RETURN 

1736 RETURN 



Ce jeu compoile 3 tableaux plus un challenge. 

Un balayage est efficace lorsque votre adversaire est sur une 

jam be. 

Si vous subissez un balayage, repliquez par un coup de point au 

venire. 

Baissez-vous pour e viler un coup de pied saute 

Un bareme est etabli suivant la difficuite et l"originalite des coups 

{100 a 1500 points) Le maximum est obtenu si vous atteignez votre 

adversaire a la tete lorsqu'il se baisse. 




Le joueur dont le score sera le plus eleve au bout de deux manches 

aura la chance de participer au challenge 

Challenge: Vous affrontez une chute dordinateurs el de calculatri- 

ces (japon oblige) Pour eviter qu'ils creusent des trous en touchant 

le sol, vous devrez les shooter du bout du pted en appuyant sur 

action. 

La superposition des deux personnages peut provoquer leffacement 

momentane de I'un d'eux; il suffit de bouger la manette pour le 

(aire reapparaftre. 



1999 i 



MOUVEME'<TS [iU JOUEUR MOIR 



2680 COLOR 0.WA(HH=5TI£K<0>:IF Sl=l THEN 

L0Cft T E A.Ei J1=0^=.II. ; TGR*M5' ELSE IF HH 
=0 THEW CH=CH-.25!RETURN 
2065 CH=CH-l:IF STRIGC8) THEN 2233 
;337 IF HH=7 THEN LOCATE A,B(PRINT U " ! A= 

H-1:P1 = 1:L0CATE ft.BJPRINTGRI. 15..;G0S!JE 5 
000i RETURN 

2010 IF HH=£ THEN L0CATE-,A, 8! PRINT A = 

u + KLOCATE A,B:PRINTGP*U6>(Pl = l;G0-.,i6 5 

060: RETURN 

3315 IF HH=3 THEN LOCATE «,B(FRINT" ":fi= 

ri+KL0C«TE A,B:pRIN"GPj; ' 15 :■ : i=I = 2: G&fue 5 

383: RETURN 

2020 IF hH = 4 THEN L0:hTE n, B: PR It^GSJ 19 

>:P1=3:C33U8 5&38:PETURN 

2033 IF HH=5 'HEN L3CSTE ft, £ ■ PRI rjTG6.i 24 

i!Pl=4(G0SUB 5e38:RETUfiN 

2349 RETURN 

2 200 IF HH = £ r H EI« .OChTE rt,B(PRINT" " : A= 

mtHLOChTE 0,e:FR:M-GRJ^7 .:R1=5:G0302. 5 

090(RETURN 

£218 IF HH=3 THEN LOCATE rt,B:RRINT" " : A= 

p-KLOCATE O.B;PP:NTGPJ-.23-;PJ=6:G03UE- 5 

800.3 RETURN 

2220 IF HH=5 THEN LOCATE A,E:PRIMT A= 

«-l:L0CATE O.B:PPIn t GRJ-...20>:P!=7:006ijE 5 

833: RETURN 

2230 IF HH=1 THEN LOCHTE A,6:PRINT" " : A= 

ntHE = B-li LOCATE A.E-: C 'RI MTGRJ l.£ 1 :.:P1=S:G 

CJ.US 5006^06677 A,B:PRINT" ":E = 8+l:Sl = 

l: RETURN 

2243 IF HH = 3 THEN LOCATE m . Et: PR INT2P7(22 

i:FORTT=1TO50:NE^TT t :l3CATEA,B:PRINT" " : 

J = Af l: LOCATE A, B: PP1NTGRS' 3 7 ■■ : FuRU= I TO I 5 

01'NEXT U:P1=9(G0SUB 5008(RETURN 

2250 IF HH = 7 THEN LOCHTE A, B: PRI NTGR? ;.22 

>■■ F0RTT= 1 TO50:NEXTTT: LOCATE A, B( PRINT 1 ' » ( 

a=wtli LOCATE fl,8:PRlHTGR*i£9J:FOSU5lT015 

0:NEXT U:P1=10(GO3U8 500e:RETURN 

■ 4 g 99 , VERIFICATION DES OFFENSIVES — 

5S03 IF A> = 28 THEN LOCATE A,B(PRINT A 

=20 

5O0t IF i:>=20 THEN LOCATE C,D(PRINT C 

=20 

5002 IF a<=3 THEN LOCATE A,B:PRINT" ":A= 

5003 IF C<=3 THEN LOCATE C,D:PRINT C= 

5004 IF A>C OR C<A THEN LOCATEA, B( PRINT" 
u eL0CftT±C»DiPRINT" ■ ELSE 5007 

5085 IF RWD<.S THEN A=C-2 ELSE C=At£ 

6086 LOCATE A,BJC0LOR 0!PRINTGR*(15>:LOC 

ATE C.DiCOLOR I i PRINTGR*<6> 

SO07 IF AOC-1 THEN RETURN 

5009 IF HA=1 THEN HA=0:GOSUB 2008 ELSE I 

F HA=£ THEN HA=0:GOSU8 1000 

-010 ON P2 GOTO 5100. 5-.20.514S. 5!60. 5160 

, 5203, 5220, 5240,5260, 5280 

5023 RETURN 

5100 IF Pl=3 THEB 5118 

5101 IF Pl=6 THEN 5102 ELSE RETURN 

5102 COLOR 0:L0CATE C.D(PRINT" ":L0C»'rE 
«.EiPRINTGR*<15>:C0LOR i i C=C+ 1 : LOCATE C. 
;.:PpTiJTGR*<10;:FDR U=l TO 250:NEXT lklOC 
ATE C,D:PRINTGR*<m:PLAV , 'TlL6A5O£D0MII>0 
MI "(FOR U=l TO 150JNEXT U:L0CATE A,B!PRI 
NT LOCATE CDiPRIMT" "(GOTO 5111 

5110 COLOR 11 LOCATE A,B:PRINT" b :L0CATE 
C.D^RINTGRIWiCOLOR 0: A=A-1 : LOCATE A, B 
:FRINTGR*<£8>:F0R'U = 1 TO 250:NEXT l::lOCh 
TE A,8:PRINTGR*(£7;:PLA>'"TlL6A50£DONIDOn 
I":FOR U=l TO 158JNEXT U:L0CATE A,B(PRIN 
T" "(LOCATE C,D:PRINT" ■ 

5111 C0L0R3,4!IF Pl=3 THEN LOCATE 10, 1£: 
PRINT"586"(SC£=SC2+58e 

SIM IF Pl = 6 THEN LOCATE 10, 12! PRINT"4B0 

"j3l1=SC1+400 

5116 LOCATE 18, 1£(PRINT" " (COLOR, MA: 

GOTO 195 

5120 IF Pl=4 OR P1=7THEN 5130 

5IE1 IF PI=3 THEM 5122 ELSE RETURN 

S122 COLOR 0:LOCATE CCxPRINT" "(LOCATE 

A,B(PRINTGRf(15):C0LOR 1 : C = C + 1 1 LOCATE C, 

D:PRI«TGR*<;5)(F0R U=l TO 250:NEXT U:L0CA 

TE C,D(PRINTGR*<12J(PLAV"T 

I":FOR U=l TO 150JNEXT U:LOCATE A,B(PRIN 
T LOCATE C,D(PRINT" "(GOTO 5131 

5130 COLOR I (LOCATE A,B(PRINT LOCATE 

: ,L':PRH'iTGRS<0>:CaLOR 0:A=A-1 ( LOCATE H,B 
iPRINTGR*<2Si:F0R 0=1 TO £50:NEXT UJLOCA 
TE A,B:PRINTGRt<£6>:PLAVTlL6A502L.'.' :: 
T'JFOR U=l TO 150iNEKT U(LDCATE A,B(PRIN 
T" "SLOCATE C,D:PftINT" ■ 

5131 C0LOR3,4!IF P1=S THEN LOCATE 10,12: 
FFIM T "3O0":SC1=SC1*300 

5133 IF Pl=4 THEN uOCATE 1 0, 12: PRINT " 1 50 

O'-:SC2 = SC2*1S08 

5136 IF Pl=7 THEN LOCATE 10, 12( PRINT " 100 

3":?C2=9C£+1000 

513" LOCATE 10,1£(PRINT COLOR, NA:6 

OTO 195 

5143 IF P1=B OR P1=L OR Pl=5 OR Pl=9 THE 

N 5142 ELSE RETURN 

5142 COLOR 0:LOCATE COsPRINT LOCATE 

A,B:PRINTGR*d5):C0L0R 1 ( C=C + 1 ( LOCATE, C, 
[.:PRINTGR*<5)(F0R 'U=l TO £50:NEVT c'dCCA 

te cdsprintgp.*'.:: •■?'•-*■•■ !:u. : ':-.::-.. ; i-o^ 

I"(F0fi U=l TO I5&(NE!<T U(LOCATE A,B(PRIN 
T LOCATE C,0:PRINT" " 

5143 C0L0R3,4(IF Pi=8 THEN LOCATE 10, IS: 
PRrNT"320":SCl-SCl*320 

5144 IF Pl=l THEN LOCATE 10, 12:PRINT "500 
"!SCl=SCl+500 



5145 IF H< 
'■:SC1 = SC1*880 

5146 IF Pl=9 THEN .OCATE 
I -:&C; = 9C1*700 

5146 _OC!JTE 10, :2:PRiMT" 
OTO 195 



CATE 18. l£lPRItiiT"S0t 



■:COL0R,NA:G 



= 6 OR PI = '.0 OR Pl = 2 THEM 31Si 

5161 IF Pl=3 THEN 5163 ELSE RETURN 

5162 COLOR 0:LOCATE C. [.(PRINT" "iLOCATE 
A,B:PRINTGR$vi5>:C0LOR l:C=C*l!LOCATE c. 
D:PPI!<TGR>-.5':F0P 6=1 TC 250:NE;.a u:LOCa 
TE C,D:PRIWTGRSU2>:PLAV"TiL6i'502[Kinil:Uf' 
I"1F0R U = l TO 150iHE>;T i.:l3CaTE h , E ; p i:- j w 
T LOCATE C.D:RPI'iT -:GOTO 5164 

5163 COLOR 1 slOCATE A, B: PR INT" ": LOCATE 
r,D:°PINTGR*'-0-:COL-S 0: fl = A-3: LOCHTE h,B 
i-njMTGPJ,; 12 ■s9LK'-" T lL6A533D0i-tID0Ml ' :F[iP 

U = l TO 150SNEKT ..:_OCa"E A.B:PRINT" "(L 
OCATE C,D(PRINT" » 

5164 C0L0R3.4dF Pl = 6 THEN LOCATE 19.13: 
PPll.!T"730":3i:i=SClt738 

5165 IF P1 = 1B THEN .OCATE 10, IE: PRI NT ■ 12 
O3":SC1=SC1'1£00 

5166 IF PI=2 THEN LOCATE !G,l£iPRINT 150 
3":SC1=SC1*1500 

5167 IF Pl = 3 THEN lOCATE 10, 1£:PRINT 100 
O':.SC2=3C2 + 1003 

51tS .OCATE 10.1£:PRINT" ": COLOR. WA: G 

OTO 195 

5133 IF Pl=3 THEN 5190 

5181 IF Pl=7 THEN 51SE ELSE RETURN 

5152 COLOR O:L0ChTE C . & s PRINT" ":LOCh t E 

A,E:PRIiilTGR*U5.>: COLOR 1 :C=C*1 : LOCATE 0. 

DfPR.iMT0P->5 ■ : H =:i-"- 0=1 T,j 250:NE>a ij:LOCa 

TE C,D(PRINTGP*'. 12 ■ i P_AV ' 7 1 l6AJ 021 'Cm i i'C-H 

1"(F0R U=l TO 15S:n£',;T U:lOChTE h,E:PP]W 

T LOCATE CDJPRINT" ":GOT0 5191 

5190 COLOR l: LOCATE A,B:PRINT" "slOChTE 
C.D(PPINTGR*C0>:COLOR 0: A=A- 1 : LOCATE A,B 
:FR1NTGR*(20J:FOR U=l TO 250-nE>:t li-LOPa 
TE A,B:PRINTGR*l27>:PLAY"TIL6A502['0|.iiL-u:i 
!»:FOR U = l TO 150(NE!<T U:lOCATE A,B:PRIN 
T" "iLOCATE C&sPRINT" " 

5191 COLOR 3,4: IF Pl=3 THEN LOCATE 10,12 
:PRINT"300"(SC£=SC£+800 

— LOCATE 10, 1£:FR>'JT"300 



"slCLOR- i 



":SC2=SC2+£__ 

;;93 LOCATE 10, 12--PR1MT" 

GOTO 195 

5£00 IF Pl«4 

5E91 IF Pl=l 

ELSE RETURN 

^cVc: COLOR GlLOCATE C,D:PR1NT LOCATE 

A,Es:PRINTGR*(15,:COlOR 1 : C=C + 1 : LOCATE C, 
i;.:PRINIGR.?.:5-:F0R U = l TC 250:ME;.;T U-'LOCA 
TE C,D:PRINTGR*(I2>:PLAY"TlL6A5021>On J r '0l'i 
I":FOR U=l TO 150:NEXT U=LOCATE A,B(PRIN 
T" "(LOCATE CDSPRINT 1 ' ":GOTO 5211 

5210 COLOR lsLOCATE A,8:PRINT LOCATE 

C,[.:PRINTGR*(01:COLOP 8( A=A-1 : LOCATE A, B 
:PRI,.|TGPJ.- 25: :FOR 0=1 TO 250(NEXT i.iilOCA 
TE A,B(PRINTGPf.26-:PL6V l T ; L 6ACC:i>0;ii DOi'i 
I"(FOP U=l TO 150:NE>!T U(LOCATE A,B:PRIN 
T" "(LOCATE C,D:PRIMT" " 

5211 COLOR 3,4:IF Pl=l THEN LOCATE 10,12 
sPPiMT "25e":SCl=SCl+259 

5212 IF Pl=4 THEN LOCATE 10, 1£: PRINT 1 300 
":SC£=SG£+S0B 

5213 IF Pl=7 THEN LOCATE 10, 12: PRINT "530 
":a';i = SCl+500 

5214 IF Pl=3 THEN LOCATE 10, 12( PRINT " 383 
:, (SC1 = SC1*300 

5216 LOCATE 10,1£:PPINT" ":COL0R,NA:G 

OTO 195 

5228 IF Pl=9 OR Pl=10 OR Pl=5 OR Pl=6 
THEN 5230 

5221 IF Pl=2 THEN 5222 ELSE RETURN 

5222 COLOR 0:LOCATE C.D:PPINT" "(LOCATE 
A.B(PRINTGR*':15mC0L0R l!C=C+ls LOCATE C, 
D:PRINTGRK5)(F0R U=I TO £50sNE-:T U(LOCA 
TE C,D(PRINTGR*a£,';PLftV , -TlL6A502D0NID0N 
I"(FOP U=l TO 150:N£XT ij: LOCATE A,B:PRIW 
T" "(LOCATE C,D:PRIWT" "(GOTO 5231 

5230 COLOR H LOCATE A,B(PRINT" ":lOCATE 
C,D!PRINTCR*<0J(COLOR 0(A=A-1 : LOCATE A, B 
:PRINTGRJ<£9>:PLAV"TlL6A502DOI1IDDMr i :FOP 

U=l TO 150:NEXT ij: LOCATEA, Bl PRINTGR* ■ 2 '■' 
>:LOCATE A,8:PRINT" "(LOCATE C.DiPRINT" 

5231 COLOR 3,4:IF Pl=9 THEN LOCATE 10,1£ 
:FRINT"900"(SC£=SC2+908 

523£ IF Pl=18 THEN LOCATE 18, 1 £( PRI NT " 70 
5 ;3C2=SC2+785 

5233 IF Pl=5 THEN LOCATE 10, 1 £s PR INT MOO 
"r3C:2 = 662-^4fj0 

5234 IF Pl=6 THEN LOCATE 10, 12; PR I NT ■■ 500 
':3C2=SC£*500 

5236 IF Pl=2 THEN LOCATE 10, 1 2! PR I NT " I CO 
0":SC1=SC1*1000 

5237 LOCATE 10, 12: PRINT" "(COLOR , WA i 
.GOTO 195 

5£46 IF Pl=2 OR Pl=3 OR Pl = 6 THEN ':250 

5241 IF Pl=4 THEN 5242 ELSE RETURN 

5242 COLOR 0=LOCATE C,D:PRINT" "(LOCATE 
A,B:PP!'.|TGP3.-'5 sCOLC'P 1 : C = 6 + 3: 1' = i' + 1 : -OC 
ATE C,D( PRINTGR*' 12 ':PLAV'TiL6A5n2DCiK]L^i 
MI"iFOP U=l TO 153SNE: - j: LOCATE A.E^PI 

NT LOCATE CDSPRINT" "(GOTO 5251 

5253 COLOR KLOCATE A,B:PRINT" "(LOCATE 
::.[■: PRiMTGPsvgi! COLOR 8( A=A-1 : LOCATE ft,Ei 
(PRINTGR*>20i:FOR U = l TO £SQ: CIE^T u:l0Ca 
TE fi,B!PRINTGR*<2?.'SFLPV li TiL6A502DONl['On 
I";FOR U=l TO 150!N£XT UrLDCATE B,B(PPIN 
T LOCATE C,D:PR!»T" ■ 

5251 COLOR 3,4!IF Pl=2 THEN LOCATE 10,12 
(PRINT "3B0" :SC£=SC2*300 



5252 IF Pl=3 THEN LOCATE 18. I2( PRH'J 7 " 320 
"!SC£=SC£+3£0 

5253 IF Pl=4 THEN LOCATE 1 6. 1 2: PP IN 7 ■ :03 
3":SC1=3C1+1683 

5254 IF Pl=& THEN LOCATE 10, 1£: PR IN T " 730 
■' : SC2 = 3C2+730 

5255 LOCATE 13 , 1 2: =«■ I 6" " -: COLOR, 'w : G 
OT0195 

5260 IF Pl-3 THEN 5£70 

5261 IF Pl-7 THEN 5262 ELSE RETURN 

5262 COLOR «:l0CAT£ C.DiPRINT" LOCATE 
A,B(PRINTGRj".: 15>:C0.0R 1 : C = C* 1 : LOCATE C.. 
[■■:PRIHTGP = .5 .:FijP = 1 *0 35f:-'!C;T iklOCa 
TE C.&:PRINTGRf!l£-:PLAV"TlL6«532D0MID0rl 
I":FOR U=l TO 150(NE^T uiLDCATE h,2:PPTN 
T LOCATE C,D:PP1NT" "(GOTO 5271 

5£70 COLOR KLOCATE h,B:PRINT" ':LOCA t E 
■ .;;:--PIi.;TGP,':'0.. : CO.Of : A = ft- i : LOCATE A, E 
:PR1NTGR*,20.:FOR 0=1 TO 253(N2vT IJ(LCCA 
TE A,B:PRINTGRtf£7 : PlAV ' T 1 1 6a502I0!'1 H-C'U 
I"!FOR U = l TO 1 S01 NEXT U:LOCATE A.B:PPIN 

T LOCATE C,D:PRINT" " 

5271 C0L0P3.4(IF Pl=3 THEN LOCATE 10,12! 
PPINT--00":5C2=SC2+7ee 

5273 IF PI. 7 THEN LOCATE 10, 12: Ppj ht '■ 9&0 
":SCl=SCl+900 

5274 LOCATE 10,12(PR1NT" ■■ : C-OlOP . HH! S 
0T0195 

52S0 IF Pl=l OR Pl=4 THEN 5290 
5281 IF Pl=7 THEN 5282 ELSE RETURN 
5262 CSLOP 0:LGChTE C.D:PRIMT" ' [LOCATE 
A,B:PRINTGR*>; IS^COLOR 1 : C = C* 1 : LOCATE C, 
D:PRINTGR*<5.i:F0R U= 1 TO 25S(NE:>T o:lOCA 
TE C,D:PRINTGR*a£>:PLAV"TlL6fi502[:G':::0li 
I":FOR U=l TO 150(NE!.T i.i:luCATE A,B:PR1N 
T" "iLOCATE C.DiPRIMT" ":GOTO 5291 
5293 COLOR HLOCrtTE 6 , 9 : PRIMT ■' »:lOChTE 
C,DiPRINTGR*<0»:COLOR 0: A=A- ■ : lOChI E h, 6 
:PRINTGRJ<2Q,:F0R 0=1 TO 250:nE6T 6:1. OCA 
TZ ,-, ,B = PRINTGR* 1 27..: PlAY "T1L6A502:. :J!-: ; I • l; !- ; 
I":FOR U=l TO 150JNEXT U1L0CATE A,B:PPIN 

T LOCATE C.DIPRINT" » 

3291 C0L0R3,4:1F Pl=l THEN LOCATE 10,12: 
PPIi.|7"75O ,, :9C2 = 3C2f750 

5292 IF Pl=7 THEN LOCATE 1 0, 1£: PRINT"?05 
":3Cl=SCl+705 

5293 IF Pl=4 THEN LOCATE 10, 12: PRINT"90B 
1 :9C2 = SC24-903 

529-1 lOChTE 10. 1 2 : P -■ I T'l T ■■ - : C CLOP.. MP: 
OT0195 

5999 ' FIN D'UNE HANCHE 

6030 IF SC1-6C2 THEN M1=M1+1 
6661 SC01 = SC01.S::l:iL02 = SCO£+SC£ 
6005 IF SCS>SC1 THEN t12=M2+l 
6007 IF Ml*M£i2 THEN 13888 
6010 IF SC1=SC2 THEN SC1=0:362=0[CH=200( 
ATTRB B,3:lnCATE 4,15!PRINT" "(LOCAT 
E 20.15:PRINT" "SG0T0142 
602C IF Nl+N2=3 THEN [4660 ELSE SCI =0: 56 
;=G:rn=203:ATTRB G-3:L0CATE 4,!5:PRINT" 
":LOCATE £8,15:PRINT" ":GDT0142 
9993 • 

9999 ' 1 ER DECOR 

10030 H7TRE: 1 - !:CL2:3CR2EN 8.4,0 

:30O1 FOP 1=0 TO -0!LINEa.9>-<I,96-I.J,- 

? : NEXT I 

1O0O5 FOR 1=60 TO 320!LlNEa.0 = -<I,I'4), 

-7: NEXT I 

19007 FOR 1=85 TO 1 95: l!NE( 72. £8)-<0, I >, 

4 (NEXT I 

I'j'JOS FOR 1 = 75 TO 90: L INE' 72, £9) -I3E0, 1 J 

,4! NEXT I 

10O1Q FOR 1=50 TO 160:LINEC72,H81-CI,INT 

■P|.[[.'.U4i+35:',7(NEXTI 

10020 C0=2B6(L0=35 

1O025 P = 10(FOR T=0 TO 1.7 STEP .03:i>CC" 

R*COS(T.xL = L0-P*?I!.J' , T ■ : EOXF -lC, L>-(CO-(C- 

CO),LO-a-L0)>,leHEXT T 

10843 FOR 1=50 TO 40 STEP- 1 : LINE ' 266+ I, 1 

50- 1! -(300- 1, 150- 1), 5 (NEXT I 

19045 E = £!FOR 1=48 TO 15 STEP -1 : 1, i ME . 20 

9+I-E. 159-1 :'-<300-UE, 158-1 >, 5: E=E + 1!MEK 

TI 

iL-050 BOXF'f-OS, 1 35 > -(£10, 170), 

I0055 B0KF< SBC* 135i-(2?5,l?0>,0 

10066 BQXF'210. 165--.: 295, 160),0 

1 j7i u 6 '-: FOP 1 = 1 TO ?:80XF(258-I,142*I)-(25 

5+1, 159-1), 3(NEXT I 

100 70 LINE (249, 143 ' -(245, 1 35 ;■ , 3: L INE(£56 

. 143''-(269, 135), 

10036 F0RI=3 TO 160:LINE(I,190)-(I+20,14 

O'.EINEXTI 

1033S FOR 1=168 TO I981L INEt 180. 149)-( I, 

!90/,2(NEXTI 

ii'O90 6U>;F. 170, 190 -..320, 168), £ 

13108 FOR 1 = 37 TO 14 STEP-KCOLOR 1,2=L0 

PATE I,22:PRINTGRf (0KCOL0P 0.2(LOCATE I 

-4.3£:PPlNTGR*(e:.:FORU = lTO100:NEXTU(LOCA 

TE I,£2(PRINT LOCATE 1-4, 221PRINT" *l 

NEXT I 

10105 COLOR 6,4(L0CATE 33, 19! PRINTGR* (30 

10116 LOCATE 10,2l:COLOR 0, £( PRINTGR*(£6 

.■[LOCATE 14,21:C0l0R : . 2: PRINTGRSC 1 1 ) ( FO 

R U=l TO 75BSNEXT IJ 

13115 COLOR 6,4(L0CATE 33, 19:PRI NTG?J : - 3! 

)(PLAV"T7L96A501DO" 

19125 COLOR 6,4:L0CATE 33, 19( PRINTGR* (30 

10130 NA=£(RETURN 



SUBMARINE 



Ces sous-marins un peu trop curieux m6ritent une 
bonne legon. , 

Commandant, vous avez carte blanche. , 



J.F.GUITARD ■ * 




120 REI1 


* NICOLAS krafi- r 


« 


136 RE" 


* & 




140 REM 


* J.F 0UITARD 




ISO REM 


* PRE SEN TENT 




160 REM 


ft SUR TI-99/4A 




170 REM 


* EN B. SIMPLE 




ISO REM 


* *SUB-MARINE* 


* 


'=■00 REM 






210 REM 


ft C.19B5 




220 REM 






230 REM 






210 REM 


*»**ft*#ft****»»i> 










260 REM 


«*****#***»»**•* 




.. , ., , 


CLEAR 




290 CALL 


SCREEN 151 




300 call 


C0LDR(3.B,13) 




310 CALL 


COLOR (4. B. ISJ 




i20 CALL 


COLOR 11. 6. 1) 




330 FOR 


-»5 TO a 




340 COLL 


COLOR(L,B. 13) 










3SO CALL 


C0L0RI13- 13.6) 




370 COLL 


C0L0RII4, 13.6) 
C0L0RU6.6,1) 




390 CAli 


C0L0R(11,13. 1) 




400 COLL 


COL 0Ril2. 13,1) 




410 PRINT TAB<9> ;">>»»> 


<<•;<<< 


420 PRIh 


TAB<9>;"> 




430 PRINT TABC«t"> SUB MARINE < 


440 PRINT TAB<9)i"> 




450 PRINT TABf9>!">>»^>> 




460 FQR 


=1 TO 25 




4S0 REM 


.*#«****-«»***«*« 


,«****• 


490 REM 


ft data as ma<"inE<bate<au 









30, 1. IB, 15.131 




,132,1. IB. 17, 133,1 


630 DATA 19. 13 


134.1, 


9,14,135,3,19,17,1 








640 DATA 15.1. 


59,32. 


6.1.159,32, 17,1,15 








650 DATA 19,1. 


59,13. 


9.18, 159,13,20,1,1 






. 159,32 


660 DATA 12,20 


15S.13 


12,14,122, 1, 12.15, 








670 DATA 11.13 


117,1. 


1,16,110, 1. 11, 17. 1 


19,1. 11, IB, 120 






680 DATA lO, 17 


113.1, 


0, IB, 114,1, 10,19, 1 



I CALL HCHAR(Ll,CD.CA,RE) 



■ COLL CHARd 



"000060FCF7. 



) CALL CHAR (138. '00303CF7FFFFFfFF"- 

' COLL CHAR 1 139, "0000>J0^03.3FFFFF " ■ 
) CALL CHARC14O.-O00'."0O030FEIFl-iF : 
i CALL CHARU25. "FFFFFFFFPFFFFFFF" ;■ 
. -"■:£ !in Or-rC B40 



I FOR 



to : 



139.10,137. . 



THOMSON 

Suite de la page 5 

11001 SCREEN 0,6,8 

11605 C0=165iL(J=55 

11010 R=20:FOR T=9 TO 1.7 STEP ,08![=i 

*»COSi.T>iL=LO-R*Sn'l- T^BOXFiCl-J-aO-' 

C0>.LO-<.L-LOr->flittEXT T 

! 1*15 BiV-iF. i:i.=5 ■-■-!■■£!}, 159 v -5 

! :.JcO BOJF-. h.250,,-4 

:10£5 M = 56!F0P 1 = 20 T STEP-l:LlWL- . 

I-IM-Ti PND*£ ■ , M -' - ' C + 1 + I NT • PWD * 4 r N ■ , 1' 

M*asfflO(t I 

::930 FOPi^L-G' ; :i.v-> T E :nt-.rwd*3s.', in- 

'■rL*5-'!HTTPb 0,O;C;Ji_;R 5: PPI IJTGRS' 3; N : i 

■ 7,3- 

11035 BEXT1 

: tworj Fi:iPI.l=:-0~:FQR 1 = 15 TO" 18 

.l$-~ COLOR .4:LINEi@, Ij-i'15, I >GRJ'-34 

:.IHE> £0.1' -■■£*, I '&F-T-34 ■iLINEOE.I ■- 

.:''GR».34j:lI'JE- It.. 1 -3 -- <■ £ 1 • 1 -3 'CFI ■ 7- 

L;NE' £9. I-3J-' 34, 1-3 ■CR*.<34> 

::&3* fop T * = : tc 5&:nekt tt 

11639 COLOR ,4iLI«ECB,IJ-' 15,1) LII 

it. I i-.£H,r," "iLlNE. 3£,1 '-.-3S.I .- " " : 1 
E. 16. 1-3 ^-(e 1.1-3 >" u :LINE r 29. I-3J-C3' 

11040 -MEKT UNEKTU 



15,137, 16,140, 17, 



■ 9 , 22 . 1 
38,27,1 



860 DATA 24,140,25,139. 

139,29,139,30,137,31,138,32. 

S.'O READ LQ,AZ 

BBO CALL HCHAP(23,LG,AZ,1> 

O90 NEXT I 

900 RESTORE 920 

910 FOR J=l TQ 32 

920 DATA 1.125,2,125,3.125,4,12: 

,87,7.49,6,57,9,56,10,53, 11.12S. 



5,70,: 

940 DATA 26,85,27.73,23.84,29,6: 

1,6(3.32,125 

950 CALL CHAR(87,"FFC399hlA!V9C; 

960 READ FG,QW 

970 CALL HCHAR!24-F(3,OW. 1) 

9S0 NEXT J 

990 GOSUB 3020 

1000 COLL KEYlO.K,S> 

1010 IF 5=0 THEN 1000 

3 CALL CLEAR 

:■ COLL 5EREENU3) 
1040 PRINT "VOULEZ VOUS LES RETGl 



510 REM 

520 DATA 128.000000301010101 . 129.0000000 

000010307. 130. OOOOOOOO ,'FFFFFFF. 131.107E7 

E7EFFFFFFFF 

530 DATA 132.O00O0000FFFFFFFF. : 

OOC;OFC'FFFF. 134.0F070301, 135.FFI 

36. FFFFFCF OF. 153. 0004001 0317CFFFF 

540 DATA 159. FF9FFFFF22ECFFFF. 112.' 

O'.v:F202E2A. 113.00 ;.E080BOBFF99<?9. : 

ooooool-.il oc . 1 is. 000000000000102 

550 DATA 116.010402010103FF3r-". 11 
F0F0FOFFFF,llB,2A2E2E2E2E2EFFFF. 

i-edecceiffff . i20.cod:coloc<:.o.jff r 

560 DATA 12I.44BeD0E0F0rSFFFE, 12: 

23.FFFFFF3FlF0FO7.124.FFFFFFFFFFf 

.FF/FfiFOEuEOB 

570 READ COD. CHARS 

580 COLL CHAR 1 COD. CHAR* ) 

598 NE-XT I 

600 RESTORE 620 

610 FOR C=l TO 38 



OOOOfO 



008070 



of..,:., i 



090 FOR H. 
100 NEXT > 
REM 



1 10 r E .m 

180 REM 

190 RANDOMIZE 

200 COLL CLEAR 

:10 R=3 
220 X-17 
230 Y=13 
240 A=23 
250 B=17 

260 CALL SCREEN<2> 
270 COLL COLOR 
2B0 COLL C0L0R<3.2.6: 
290 CALL C0L0RI4.2.4: 
300 COLL C0LOR(5,2,l: 
CALL COLOR 16, 2. 9; 



. siEY <■■ 



2.2) 






S6. "E7C 



i. "FFB1B: 
1, "FFFf 
,8,40. 



voooaicj-EV' 



:40 CALL CHARC 
350 CALL CHAR t ' 
360 CALL CMflBC 
370 CALL HCHARI 
Jae CALL HCHAR(24.8,40, 19) 
390 CALL VCHAR(1,S.40,24) 
400 CALL VCHAR( 1,27,40, 24; 
410 CALL HCHAR<2,8.40,1S 
420 FOR 1=1 TO 21 

CALL HCHAR(R,9.4S, 1£ 

R=R+1 
450 NEXT 1 

460 COLL JOYST(I.DX,DY) 
470 CALL KEY(1,K.S) 
4B0 IF AO THEN 1B50 
490 IF K=18 THEN 1670 
500 CALL HCH0R(Y.X.4B) 

X=X+DX/4 
520 IF X>26 THEN 1590 
530 IF X<9 THEN 1610 
40 Y=Y-DY/4 
150 IF Y<3 THEN 1630 
560 IF Y>23 THEN 1650 
570 COLL HCHAR(Y,X.S6) 
5IJ0 GOTO 1460 
590 X=X-1 
6U0 GOTO 1460 



cJO GOTO 

640 GOTO 
650 Y-Y-: 
660 GOTO 
670 CALL 



1460 



HCHORIA.B.64) 



i,90 A-O-INTIRND*; 



■1 B=B-lNTl-RNDft2) 

) IF B^ll THEN 19B0 

) IF B>23 THEN 2000 

3 GOTO 1510 

) IF Y=A THEN 1730 

J CALL HCHAR(A.B,64) 

3 BBTfl 1690 

i CALL HCHAR(Y,X.72) 

) COLL SOUND (500, -5, 2) 

> CALL S0UND<5O0,-6.7) 

) COLL aOUND(500,-7, 15) 

) FOR 1=1 TO 500 

3 NEXT I 

B SB8UB 2320 

!l C01.L SDUNO(20O0,-7,O) 

1 8=3 

i FOR 1=1 TO 21 

j CALL HCHAR(G.9.72, 10) 

J G=E+1 



2550 PRINT "TICALE DE CEUX CI,":I 

2560 PRINT "VOTRE MISSION CONSISTS 0": 

2570 PRINT 'DETRUIRE UN SOUS MARIN. 1 ;: 

35B0 PRINT "> APPUYE2 SUR UNE TQUCHE i 

2590 CALL SOUNDUOO. 1500,2) 

2600 CALL KEY(0,K.S) 

2610 IF S-0 THEN 2600 

2620 CALL CLEAR 

2630 PRINT "CE SOUS MARIW APPARTIENT": 

2640 PRINT "OU SAVANT FOU E 



. TO" 500 



2650 PRINT 
2660 PRINT 
2670 PRINT 



2690 PRINT 
2700 PRINT 



J FOR M=l TO BOO 

I NEXT H 

) CALL CLEAR 

J GOSUB 2100 

T<RND*3)+ 



I GAME OVER f 



1990 GOTO 15; 
2000 B'=B+INT 
2010 GOTO 15: 



-=vhD*r; 



] CALL CLEAR 
I CALL SCREEN 
) PRINT "DUEL 



• F'RINT 
) PRINT 



.ISEZ LE JOYSTICK P 



2130 CALL SCREENI2) 

2190 BOSUB 2B90 

2200 PRINT "DESOLE MAIS LE MAKIAVEL 

2210 PRINT "A REUSSI A PASSER ><"':: 
2220 PRINT ■■VOULEZ OOUS REJOUER ?" 
2230 COLL kEY(O.K.S) 
£240 IF S=0 THEN 2230 



22B0 REM 

2290 REM ft gagne » 

2300 REM **ft#**ftft» 

2310 REM 

2320 CALL CLEAR 

2330 COLL SCREEN (2) 

2340 GOSUB 277© 

2350 PRINT " TOUTES P 



SPUE PLUS RIEN" 
VOUS ALLEZ ETRE PRDMU":; 
PRINT TAB<I1>:"GEN£RAL" 

VOULEZ VDUS REJOUER -?" 
«EV'O.K,S) 
HEN 2420 

:=79J=-1 THEN 1140 ELSE 



2380 PR IN 
2390 PRIM 
2400 PRIN" 
2410 PRINT 
2420 C* 
2430 IF 
2440 IF 

2460 
2450 RETURN 
2460 END 
2470 CALL CLEAR 
24G0 CALL SCRE£N<131 
2490 PRINT TAB(10)i"REGLES DU JEU" 
2500 PRINT ;:;:'VOUS ETES AUX COMMAND*' K 
D" 1 : : 
2510 PRINT "OOISSEAU TREE SDPHISTIOUE. " : 

2520 PRINT "VQTRE BATEAU PEUT EN EFFET": 



ODN KRADD" 

FAIRE":: 



"QUI 5 "EST JURE 

"SAUTER LA TERRE-' ; : 

"POUR COULER LE SOUS MARIN.": 

"PLACEZ VOUS SUR LA CASE DE. 11 

-SIREE ET TIREZ.L'ORDINOTEUR" 

"AFFICHE ALORS L'ANCTENNE P0_ 



2710 PRINT "SITIDN DU SOU: 
2720 PRINT "BONNE CHANCE 
2730 F 



2740 



TO 1400 



VOTRE NOtl MCIN' 

COMMANDANT ?"[D* 1 , 29( 

:: "COMMANDANT "SD* 392,1 

::"NOUS PARTONS IMMED10TEMENT 2B10 

"A LO RECHERCHE DU SOUS MARII 



19B.2,: 



.';60 GDTO IOBO 
27 70 RE5T0RE 2790 
2 7BO FQR M=l TO 10 
2790 DATA 2O0. 196.1, 

2,200,4,220,19 

264,2,266,4 
2B00 DATA 250,262.1,264,2,266,4,270. 

2. 29B, 4, 200, 294, 1 , 296, 2, 2' 

394,2.396,4 
DATA 230.330,1,332.2,334,4. 

4, 220,262, 1 .264. 2, 266, 4, 
334,4- 
2820 DATA 260.262,1,264.2,266.4,200 

2,224,4,360.349.1,351,2.353,1 

296.2,298,4 
2830 DATA 340,247,1,249,3,251,5,600 
4.264,8,266.12 

2B»fl R6AB MM.OD.FF.RT, JI.LO.F'X 
2350 CALL a0UFMI>(MM.t>C.FF,RT, JI.LD.P. 



::">30 RESTORE 2950 



117, 1 

2970 DATA 558.117.1,119,2,12: 
1, 112,2, 114.4,1000.117.1,119. 
29S0 READ If. XZ, BN.MC,DE,R0,1 
2990 COLL SOUND<ZX,XZ,BN,MC,[ 
3000 NEXT U 



I RETt 



) CALL SOUNDI200, 196.1, 19B 
I CALL S0UND12OO. 196,1, 19B 
1 CALL SOUND 1200, -.49. 1.351 
) CALL SOUND ..2 50. 330. i, 332 
< CALL SDUNQ(200, 294, 1,296 
1 CALL SOUND(20Q', 262, 1,264 
, CALL 50UND(200, 165, 1,167 
1 CALL SOUND (200, 196. 1.198 
) CALL SDUND(20ir.._'62, 1 ,264. 
) CALL S0UN&.200. 247. 1,249, 
I CALL SOUND(200,19 
J CALL S0UND'2O0.22<_<. 1.222. 
) CALL SOUND (200,247, 
I CALi_ SOUNDS200.296 
) CALL SOUND (200, 262 



.2.200 




.2,200 




,2. 353 


4) 


. 2 . 334 




, - . 29E! 








, 2 . 1 C.9 




. 2 . 20C 




, 2. 266 


4) 


.2.231 




. 2. 200 


4) 


.2,224 


4) 


.2.251 


4) 






.2,266 


4) 



324© 


f-:t.I..JRM 


3250 








REM 




3270 


REM 




3280 


REM 




;2 r -o 


REM 





11645 FOP 1 = 33 TC- 37:CC'L0P 9,3: LOCATE I, 
* L 'HiPS-IWTGR*-35 :l:3ChTE 1 , 23 : PF; riTGP? ■ 3S= > 
:WEi:TI 

1IB50 FOR i = l TO ";ti:F":-E T ' INT- SN[>*;i-0 ■■.!(.! 
: Rr.lD*59> + 155-.,0 
U655 NEXT! 
11059 ftTTRS 1,1 

llBSe F0R 1=3? TO ifl STEP-HCOLOR 1.3:LC 
C«TE I.££:PPrNTGF*' Ci ■JCOi.Cifi C1.3SL0CATE I 
-4.££:PPlr'lT.:,-:$ ■ = " :■ F-- 1_ - - : 'ri 1 00 : nek ■ : 1. OCh 
TE I.gS'POTWT" "ILOCBTE I-4,££:PPINT" »S 
WEMT I 

;i065 LOCATE 10.£i:COLOP y . 3 : PR1 NT ,j&f ■ n 
:lOChTE 14,£l:C0L0R 1, 3! PRIMTGRIi 1 1 1 ■ FO 
P = 1 TO ?50:NE>;T U 
11070 PLrtV"T7L96AS01D0" 
UB80 NONRETURN 

1£090 • 3 EKE HCOt 

li-eC: CS:?CREEWe,4,e 

l.£010 BuKF.g, 1 fin ■- -£0.£09 , -i. 

SiOiU BQXF B,40>-v'iO, :fO . T; EiOKF- ■ an, = j ., 

. 7 : eO;;F 1 90 . 1 50 1 - ' 1 ££', S0 > . ~ 

1£B30 EOftF. I'fl, :5e - l&e. 13- .6:B0KF- ir.g, 
!5B,.-i. 190.00 .i , ;8O-:F'19^.l50J-.£35.?""..^ 
:E:0.".F.£35. 150 ■ -■ £30. 7(5 ■ . t.:BOKF' Ss®. 150;- 



! STEP 



■:PSET 1 



12034 0=0 

i.-y.";"5 ^ErttXJFOR I = j 
0, 1 >CHRI(ia7>,e:NEHT I 

:£040 0=0+2! IF 0=48 THEM 12045 ELSE COTO 
I£036 
[2t)4t DATA 5-5,5. 7, 7, 7,3,3, £,£,6.8, 6. 6,6 
.S9. 9,6,6, 6 

[SMS FOP I=?46 TO £55:L1NE' 1. !55)-U + 5, 
!?C ■■ ?: WEXTI 

: ,:.a-k. FQP !=S4'.j TO £55:lINE' I. 155.'-' 1+5. 
;53.3:ME)!TI 

Iiii47 FOR 1 = 244 TO £ 7fl; f_ I NE ( I . 1 651-H+3, 
159., liNEXTI 
12048 C0=£53iLO=171 

:;04- R=51F0R T=0 TO 6.3 STEP ,i:C=CO-SS 
CCC'T ■ sL^lO-S'-j'jIN! ' ■ : P5ET ! C . L >:l IWE-iC..L 
'■ .0!NEXT T 

:;m = l> P = 5:F0P T=0 TO 6.3 STEP .SiC-CO + R* 
'.05«T .!L = LO-R*SIW> T ':PSET(C.L':LIWE>CO,L 
O'-'C,L>,0:WEXT T 

:J'95£ LINE': £74, ; ^3 ■ --. £90. I 63 ■ , ■ L INE ■' 274 
. 161 '-i[£89, ltl),0 
1£O90 Nft=5 
[£■105 PETUftW . 

I7O00 ' C H A L L E U G E 

.5001 CLS:SCREEN 4,0,6 

1311^3 FOR Y=l TO I1SL0CATE 1 1, V* ATTRB 1, 



HCOLOR 3:PSINT"C A L K E"!LOCATE 11,23- 

VJPRINT" H L E G":FOR 0=1 TO 100: NEXT6 ' C 

LSSNEXTY 

13603 TOR K=l TO o!C0L0RK:L0CP.TE 11,1£!R 

PINT"CHALLENGE"!ME>!T K:FORG=lT05'it)S H£:nC 

!PLAV II 04T5L6DOMISOMIDOI1IDO ,, :CLS 

13004 TEMPS=120 

13010 IF SC01>SC0S THEN C0U=7 ELSE C0U=1 

13011 U=15:; = £0:LC;.hTE 1J.":COLOR COU,0!P 
PIPITGR*<0> 

13016 WI=4: hll 1 = EflT ■ vw*s '.■ *£'■ rU S- tWT ■ liubi 
£ '+3:NI3=3 

17025 LINE<0,£1 '-<39,£1 )CHR*U£7i,£ 
13030 COLOR 4,6.-LlN£f0,£^-'39,2;GR*(49) 
13040 FG=INT<RND*30)+5 
!3041 FGl = ItilT(RMD*30) + 5 
13042 FG2=INKRND*30) + 5 
13044 FG3iINT(R»Dt30)*5 
1 3050 P';ET(FG.NI 'CRf i 30), 0,3 
17052 P9ET.FG1,NI1)GRJ<38>,0,3 
13057 F7FT.rC2.NI; 'OP £■ 791,7,8 
! 7055 P'r:ET.:FG7,NI7 -OP J ■ 39>,7,8 
1ZQ6V GOSUB 13500 

: 30-35 TEMPS=TEMPS-l:IF TEKPS-. =0 THEN FOR 
L'*l TO 508! NEXT Lj:PLAV"TI LI 3DOHISOMH-0H 



BUDGET FAMILIAL 



Vous avez des problemes pour g6rer votre budget? NOTA : au clavie r £ = # 

Ce logiciel utilitaire vous permet de les resoudre. II re- 
groupe un certain nombre d'operations indispensables 
pour ce faire et, de plus, il sauvegarde sur K7 les ope- 
rations realisees. 

Marie Claude ZAZZI 



En raison de la longueur in- 
habit uelle du listing nous 
passe rons ce programme 
en deux lois. 



GC.ST ION 
BUDGET Ffi> 
RIGHT Z A Z i 



■ttab(5> "1/ POUR ENTRER r 

ittab(5>"2/ POUR ENTRER f 

ttob(5>"3/ POUR LISTE des RUBRIQUES' 

ttab<5>"4/ POUR LECTURE du JOURNAL' 

ttab(5)"5/ RETOUR au MENU general' 

ttatHS)"6/ MACHINE CALCULER' 

atcl890, 1260, 750,370.230.2660 




2">50 i3nAaotcC96<:>, SO' 

SWO wipeitonelOO, 150: 
M>,230-,3:autput "*=*=*=■ J 

2970 output"* RAPPEL I 
U3120 

29B0 output"* Tapca", : 
utpul 



jotput"** A D D 1 T I N 
=*=*=*=*=*-*-*=*=* ",56, 220 
', 90, 2 10,3i plot 05.200.65,3 



I Y=0:: 



reenS, 140,240. 60 



iCls 



1 Jutre chi f- 
. (10>"+" :Y=Y 
I goto 3000 



i GESTION BUDGET ; 



;.*.*.! 



',211 



:output"t.* 630 
.230, 



35ub23V0: T=0 
-pe:rB5tarell70:oi 

iOWtpUt" +*♦«+»+»*■; 



■J „T(65> , 



1 70 Output" *.*.#.*.*.*.*,*.* . 
ISO tane355,205 
190 'flrapeju majusculs / minu 
200 clesrlOOO.SiBFFF 
210 'crtation des tableaux 
220 dimC(31,12),J(2),M(2) , AN ( 
ine600,375!pausel 
230 «ipe;bnghtl:cD]orO, 1 ,3, 3: tonelOO, 250 
240 output "If E N U", 105,225, l:output"M E 
output"*. *.*.*. X.I. *".B5, 21 0,2 
250 gosub2500:per>2 
260 pr-int:pnnt 
270 pnnttab*5)"l/ LECTURE de la CA55ETT 



U", 106,224, 



640 MG(C)=MG:ME=( 
tN;""ESlN);" : ";[ 
BS0:gosub2390 

40,230,3!Output"*l 
: print 

660 nC!C)=PlC:HC=( 

V«(N) ;" : ";C<N,M' 
i O5ub2390 



■rs":MG=NG*Cir 



1C+C(N,M)!n B ]-:t:gosLiblS60: 
1 DEFENSES PERI0DIQUE5 «* 



:i60:go 3l 



320 f 



U5>"2/ 



SAUVETASE 



nttab<5) ". 
340 brightO:gosu) 
330 onAgoto2610, 900, 2740, 2B60 
360 gosubl730 
370 'lecture DU journal 
380 wipescolorO, 1 ,2,3: tonelOO, 250 
390 output "LECTURE DU JOURNAL" , 35,228. 
=*=*=*=*=*=*", 25, 21S, 3 
400 gosLib2510:pen6 



OPERATIONS" 
JOURNAL" 
CALCULER" 



6BO l1D(C>=MD:t-1D=0: print: print : f orN=20tD31 : pen2: pnntNs " 
"S*(N> ; " : " ;C(N,ri(C))"Fr5":MD=MDi-CON,M):np>Lt:ga5ublS70: 
gosub2390 

690 "5/prg. snide 

700 S0(C)=M.G-<MC-H-ID+TC):wipe:restorell90:gD5ub25l0:pen3 
:printtah IB> "** SOLDE "BS 

710 outputMSlfllC) ! ,35. 1 30, 2: output AN < III , 95, 130.3: pi nt 13 
5, 135,50,20,3:outputSO<C),135,130,l:output"Frs",200,130, 

720 gosubl670: i*0S="e"thcngoto5B0: el 3egoto4B0 
730 goto370 



3020 output"* TOTAL 
tV, 148,55,1 

3030 gosLib27-90:goto2S50 

304O wipe: tonelOO, 150:oi 
30, 3: output ■■*-* = * = *=* = * = *-*=*-* = *", 5 
&ub3140 

3O50 output"-", I OB, 125,3:gosub3150: 
b2390:goto2B50 

3060 Hipe: tone 100, 150: output " ** MULTIPLICATION **",60 
,230, Z: out put" *=*=*.*=*=*=*=*-*-*=*=* ",56, 220, l:gosub312 
0: gosub3140: 

3070 output"*", 108, 125,3:gosub3150:V=V*Uigosub3160:gD6u 
b2390:goto2850 

3080 wipe: tonelOO, 150: output"** DIVISION **",6 
3, 230,3;output" *=*=*=*=*=*=<=*=*-*=*=*=* ",56, 220,1 

3090 gosub3120 

3100 linel30, 140, 130, 30, 2: pi ot 130, 100.6O, l,2:output " ler 

chi**re",40, 140. l:cursor55, 120: input A 

3110 outpuf'2eme chiff re" , 150, 140, l:cur soi-145, 120: input 
B: Y=A/B:outputY, 140,90, 1 :gosub2390:goto2B50 

3120 output"* Tapez",10,lS5.3:autput"RETURN",60,lB5,l:n 
utpuft' la fin du CHIFFRE) ", 105, 185, 2 

3130 output"* Tapes", 10, 175, 3: output "POINT. ",60,175, l:o 
utpuf'lau lieu de VIRGULE) " , 105, I75,2:plot5, 150, 232, 2, 2 

npuf'ler chiffre ? 



.10,65,60, 15, 3:t 



I wipe: color-0, 2,5,6: tonelOO, 250 
> output"** LISTE DES RUBRIQUES < 
ltput"=£>£=C=£=£=£=£=f>£=£=£=£=£- 



LECTURE F 
LECTURE f 



I RUBRIOUE ET SOLDE": 

1 MDIS SUR UNE ANNEE": 

MENU general":pnnt 



;, 140,135.14 
.25,210,120, 



65:cls0:re^tor 
I. , ,120,60,3:t 



3140 


plotl 


0.80.70, 2 


2:turaor40 


140i 


■;V:return 








3150 




40,105linput"2«ra chi 


*r« " 


3160 




"RESULT AT 


->>",30,60 


2tpl< 


putY 


120,6 


,0:return 






3170 








31S0 




0,155:plo 


10.230,225 


30,3 


notre DERN 


ER RELEVE 


**", 15,220 


1 


3190 


outpu 


"* Nous 










45,175,3:gosubll 


3200 




25,160:pe 


2:printBI; 


pen3: 


Iiprir 


t"";ANtC>;" 


:pen3:prin 





[-*-*-*-*-*-< 



tmiHicn 

(C) : outpu- 
20,130,7 



4B0 wipe: color 0, 1,6,3: tonelOO, 230 
490 output"* C H I X *",90,230,: 
*«»" -, 7B.215. r.;aosub2510: pen2 



) output"> OOTRE DERNIER SOLDE -■'", 
)E :",60,55,3:outputSO(C) ,125,55, I 
losub2390: goto230 



iut "FRS", 200,5 



B^O pen2!prn 



| MOUVEMEfJT ANNUEL t 



A SUIVRE... 



TOUJOURS PLUS DE DEULIGNES 



Que de programmes, que de programmes ! Du pire au meilleur. ils 
arrivent toujours aussi nombreux a \a redaction Felicitations I Et 
voici pour vous meltre I'eau a la bouche les accesses 

Premier du lot, Pierre GRAVELINE vous offre ses mstogrammes en 
relief et en deux lignes Les deux premieres donnfies a rentter sont 
le nombre de vateurs et le maximum. 



1 SCREEN* S ::■■. = £■■?'?: 1 uf L!T H , B= ': = 1°?-B m - 0II1D< A 
*^.:rOfiE = l T 'J»- [MPUTF !DfE ' = r *C:: ME : ■" : C. :■ : f 
0PC=lTO«:rOPM=iTr7:REH!JK:rriPH=IT03!: = H+J 
:IF G>A THEM K=fl 

S L=S-D<G>-HSLl«Ea + l,LJ-i,I+4.L)iK!LIi*Et 
:--!.!_*£■-■ :*4.i--3-h -.INLINE ' I. ^i-D ii;:- i ■- 
I,^>,K:HEMT:j=_' + 8:.>G+l:NE;:T:G=r J -i:REST 
0RE:NEKT:DHTH4,S,1 



Dernier des accessits, F 
neigeuses a la poursuite 
Listing SPECTRUM 




1 Uii 

ffiflSl ■ j 



PFtJSt lie 
■ INT (RND, 

'lllliSS 

S AND ;;<;i:U : PRIM 1 

W tfjIMW ii;i]i; "bonus 

.".NsifiB: FOR 0-1 TO bS: NEKT I 

.let a-StS*i93i_ p P 1 '"' « T w.i". 

.JftT IB, 



TLRSH 1,BT IB.ia, ,rc 
. PfiINT RT 13,8, ■'VOTRE OCOR 

C..",5 PRINT Bl.'rReaSER IK" " 
UOME POUR REJOUER" PRUS" a 




*4 

Alexandre AMORTILLA sera sans aucun doule sacre champion des 
Texistes grace a cette magnilique bidouilie horlogesque A lui les 
soils ! 



1 A$ = "26: :00u00t!0r:2i.coeui700900000000:00 

32003 ■; O JlOOi 1 >0 267: 05B6B3461 10: 04:605B7<0 

<73=l 8^00906953'. B>O69StOB3069502>0B3>0O4 

' 5:041 13<4<:04:06<lO41B<O42:O4:O6<105B0" 

AI-A*&"041B05C0O4<;2045;" :: CALL INIT 

FOR 1=1 TO LEN(A*>/2 is CALL t,DAD<935 
-I, 16iilASCtSEeS(A*,l*2-l,l)>-4B)+ASC(SE 
i(AI,l«2.1))-48):: NEXT I :: CALL LOAD! 
;i804.38.154) 



Alain GUIRI vous offre son Pictor en deux lignes, avec crayon opti- 
queet le reste Allez-y les Vinci et autres Michel Ange ... 
Listing T07 tf 2 

1 ELEflR:eU>$Efi£EK7,?,eiBfl*sre«»t6a>-C3i9 

, 199>,0:LOCOTEe.Ii:rOPl=yTQ7: COLOR, I = PRI 

MT" ";!;" ";! NEXT: COLOR, G: PRINT"CJjJJLE.Jk" 

;FRIWT"8=B0ITE;T=,Ri,IT;C = CSaVGN":PRIMT"P 

oinCer le crayon ?ur !X> pour ==>":B*="D 

OI>O ,, :C*="PPP":E^33:F=£l:G=£5:H=£2:0tJERI?0 

PG0T01iC0L0R",e 

£ L0CATEE,F:cbLOR7:PLflYet:irjPUTDt:lFDii" 

[''■OPDH 11 ' 'ThtnJSrLiEC.^v'HLa-'SisLOCrtTEGjH! I 

NPUTA*: COLORE: INPUTPEN>;, V:PLft¥C»: IMPUTPE 

MS,L:IFAt="B"THEHEi0>!O!,V.-vK,Li:G0T0£ELS J* ' \lf 

EIFfl*= , 'T"THEWLlWEi:i.Y:'-'K,L;:QOTO£ELSEFO *^ ftf*, 

RJ=1T02:IWPUTPEW!!,Y:IE«=-1THEW2ELSEPSET< 

X,Y>:J=J-l:liEXT ^^^S. fcy" "' 

• • ^^ ;. 

Didler TOURSCHER a dii cogiter dur pour arriver a ce magnifique 1 a 
resultat. Par un mysterieux hasard, vous allez en avoir plein les is 

mirettes du coup ! ^*«. 
Listing CS4 



Victorieux dans la categoric humour frelate et programme libidi- 
neux, Pierre PILATO vous envoie une piece de collection dans la 
se>ie les programmations hippoastueieuses de tonton Pierre. Apres 
un run, essayez CALL 797 puis LIST. 




E? 1 PI 28 A2 A 
10 EB E£ A5 C 
0B23B-: FDR I = I 

ASC C M1D« (H»,! 



- 1: 

POKE PI ; 
TO 99??; NEXT : 



*** 



s et a la semaine suivante t 



LES BABAS RECONVERT® 



Jeff Minter est fou. Depuis 

quelques annees. il cree logi- 
ciel apres logiciel sans repit. 
Nous avons parlfe du dernier 
II y a deux semaines, il 
s'agissaii de Psychedelia, qui 
suivait de peu Les Moutons 
dans Te space et L'Attaque 
des ohameaux mutants. Ce 
n'est deja plus le dernier 
Cette fois-ci, e'est Ancipital, 
un autre del ire post-baba 
dans lequel un etre mi- 
homme mi-bouc doit poursui- 
vre son chemin a travers un 
immeuble, entierement sous 
le controle d'horribles 
Zzyaxians, dont toutes les 
pieces sont remplies de gaz 
hallucinogenes. Premier ta- 
bleau^ detruire les pommes 
pourries qui vous attaquent a 
I'aide de bananes. Le reste 
est a I'avenant. On retrouvB 
les grands phantasmes de 
Jetf Minter, les chameaux, 
les Hamas, les chevres, les 
boucs et il y a meme un petit 
nouveau: Rory, le cochon 
d'lnde rampant. A mon hum- 
ble avis, a I'instar de Robert 



de Niro qui maigrissait de 20 
kilos pour un role, Minter a 
du tester soigneusement et 
dans le detail les hallucino- 
genes avant de les inclure 
dans son jeu. Pour I'instant, 
ce logiciel ne tourne que sur 
CBM64, mats il devrail pro- 
chainement §tre disponible 
pour les micros Atari. 




L'INSTITUT I1MDWSTRIEL DU NORD 
SE REMUE 

et organise un concours de valeur des lots, parce qu'au- 

micro-infoimatique pour faire jourd'hui e'est Dimanche et 

comme tout le monde. C'est personne n'a voulu repondre 

moins remuant que le smurt, quand j'ai appele. A Hebdogi- 

moins couteux que les jeux ciel, on ne connait pas les 

olympiques de Los Angeles, Week-end. 

moins abrutissant que Porte 

Bonheur de Patrick Sabatier, 

ca aura lieu le 15 Mars dans 

les salons de I hotel 

Concorde a Paris. On peut 

apporter son manger et s'ins- 

crire aupres de I'lBM en tele- 

phonant au numero suivant: 

(20) 91 01 15. A VILLE- 

NEUVE D'ASCQ. Les lec- 

teurs qui appelleront sont 

pries de nous faire savoif la 




C'est nouveau, pa Went de sortir 



BIDOUILLE GRENOUILLE 



L'ascenseur delabre qui mene au 
bureau du Vieux est toujours 
aussi gnncant Lorsque j arrive 
au dernier etage. I'eternel Mougin 
m'accueille avec la morgue qui lui 
est habituelle Rien d'etonnant, 
me diras-tu. Iideie lecteur qui me 
pratique en long, en large et en 
travers depuis si tantde lustres il 
a Gte gardien a I'instituI medico- 
legal Tu t'en doutais ? Tres bier, 
o mon lecteur mgrat, puisqu'il te 
faut de la surprise, puisque tu at- 
tends de ton San-Bandomo cheri 
qu'il t'etonne. bouge pas, tu vas 
pas en revenir 

Mougin m'iniroduit (ie lavais 
jamais faite, celle-la ') dans Ie 
bureau du Vieux Lorsque j'entre. 
celui-ci est plonge dans une 
conversation telephonique capti- 
vante Je massieds legerement. 
doucement pour ne pas deranger 
Ie grand homme doni Ie crane 
chauve bnlle plus que jamais Tu 
sais ce que c'est ? Je polis avec 
application longle de mon pouce 
gauche, n'empecfte, je rertouche 
mechamment Ie Boss, e! je peux 
te garantir que |'ai les esgourdes 
en radar et les meninges en ebul- 
lition 

"Je vous dis d'arreter tout, 
Erwan ! Excusez-moi, mon petit 
Bandoine, |e suis a vous tout de 
suite. Ecoutez, crelm, je vous dis 
qu'on peut echapper aux yeux 
pales et globuleux de Hobbit ! 
N'est-ce pas, Bandoine ? II est 
d'accord I Vous entendez ? II est 
d'accord ! Et comment faites- 
vous, Bandoine ? 

- Monsieur ledirecteor. je. 

- II le salt l II salt qu'il faut tuer 
un Warg, le prendre, et le lalsser 
tomber lorsqu'on rencontre les 
yeux pales, puis ie teprendre, et 
avancer a I'Est Et vous le saviez, 
mon petit, qu'il tallait rep6ter 
I'operatlon trois lois ? Hein 7 Et 
vous saviez que la corde se trou- 
vait dans la caverne au nord des 
Trolls ! 

• Mais, Monsieur le Directeur, 

|e... 

- Vous voyez. Erwan ? II le sa- 
valt !" 

Dis, II commence vraiment a me 
courir, I'Apotre II m*a telephone 
chez Fellcie ii y a a peine vingl 
minutes sous un motif 'secret et 
urgent", et tu le connais, I'Ance- 
tre, avec ses mlnauderies de 
chatte en chaleur. impossible de 
lui faire cracher le morceau. Je 
Fulmine, mais il raccroche abrup- 
tement, "Excusez-moi. mon petit, 
encore un de ces cretins Nous ne 
sommes pas secondes, vous et 
moi Dites-moi. Madame votre 
mere fait-elle toujours ses deli- 
cieuses crepes ? Non. ne repon- 
dez pas, |e lis la reponse dans 
vos yeux Excellent, mon bon 
ami, |B m'invite.' 
Son bon ami, tu te rends 
compte ? Quand il minterpelle 
sur ce ton-la, c'est qu'il a des 
idees douteuses derriere la tete 
Pendant que je le drive chez ma 
fellcie, je le laisse delirer ton son 
saoul. 

"Voyez-vous , San-Bandonio , le 
probleme est simple Une puis- 
sance etrangere, le Betouchislan 
subtentrional, a reussi a inliltrer 
une grosse compagnie ameri- 



caine. Texas, vous connaissez ?" 
J'acquiesce {je ne peux pas opi- 
ner tout le temps I) 
'Resultat, mon bon' tous les ap- 
pareils qui sortent de cette fabri- 
que possedent un "marquage" 
special Savez-vous comment Ion 
s'en est apergu 1 Tout betement 
en tapant la sequence suivante 1 
REM et toute la ligne de CTRL-Y 
II faut faire ensuite EDIT 1, pres- 
ser la barre d'espace jusqu'a un 
apparent plantage, taper Erase 
(FCTN 3) et taper une ou deux 
fois (cela depend) V47573 puis 
Enter Notre homme sur place, 
Vourgere. " 

Nous sommes arrives En m'exttr- 
pant de mon carrosse. devine ce 
que j'avise ? La voiture du 
Gravos. reconnaissable a ses 
phares pendants au bout d'un fil 
de fer rouille et a labsence de 
portiere arriere gauche Je pre- 
sage de la remuance dans pas 
longtemps 

Effectivemenf, a peine arrives sur 
le perron, que nous entendons 
lorgane du Gros entonner le 
chant des matelassiers Pauvre 
Felicie ! 



e. s, e, prends petrole, o, n, n, 
e. s, e, prends briquet, 0, n, o, 
n, n, allume bripuet, allume 
lampe, etems briquet, enfile 
combinaison, repare teleporteur. 
pose tournevis. appuie rouge. Br- 
ieve combinaison, etems lampe, 
pose lampe. prends clef, e, s, o. 
s, s, s, prends pot, o. o, pose 
pot, o, monte, n, e. n, ouvre pla- 
card, poignarde monstre, s, o. s. 
descends, e. prends pot, rentre 
code ' 

"Le code a rentrer, c est celui qui 
est dans la piece du monstre", me 
sussure la gamine Je dois avoir 
I'air eflare, car eile me regarde en 
rigolanl 

"Me fait pas croire que toi, le su- 
perman de mes reves. tu es de- 
Sasse, non ? 
egarde, j'ai mieux. J'ai trouve 
comment echapper a la noyade 
dans Aztec: il suffit de dynamiter 
un mur J'ai trouve aussi 
comment entrer dans le temple de 
Quest: il faut passer par le mare- 
cage par derriere la montagne, et 
on trouve ("entree cachee du Tem- 

Ple C'est pas tout, y a Valhalla ! 
our avoir Orapnir, il faut 



[Ijtaftf; 




J'entrouvre prficautionneusement 
la porte, pour decouvnr avec el- 
Iroi une scene peu engageante 
Biru et Panuche, dit La Pane, 
sont ellondres dans lentree, et 
un amas de bouteilles vides jon- 
che le sol. Ma pauvre mere s'af- 
faire a eponger llgnoble. tandis 
que la Vieillasse est lamentable- 
ment ecroulee sur le sol. J'en- 
jambe. et arrive enfirt dans le 
salon Surprise, alors que la 
piece etatt Impeccablement nette 
volci a peine une heure, elle est 
maintenant envahie de machines 
de toutes sortes. et au milieu de 
ce capharnaOm se tient Marie- 
Marie. Des ecrans sont alltimes 
un peu partout 

'Marie-Marie, qu'est-ce que c'est 
que ca ? 

- C'est I'oncle Biru qui m'a 
achete des ordinateurs pour que 
je poursuivisse mes etudes, San- 
Ba Regarde, la I C'est le moyen 
de resoudre entierement Le ma- 
noir du docteur Genius !' 
Je jette un coup d'oeil sur I'ecran 
incrimlne", et je distingue une 
suite de mots incomprehensibles 
et un dessin 

"Entre, e, e, prends ciseau, o, o, 
o, monte, e, prends combinaison, 
n. prends pot, s, o, descends, e. 
e, e, ouvre robinet, remplis pot. 
pose pot, ferme robinet, n, o, 
prends tournevis. prends lampe. 



Opnlr. ou trouver quelqu'un qui le 
portera pour toi Je suis sOre que 
Burzlaff le fera Puis, il faut aller 
a I'Est des 'Pits of hell", et de ia 
caverne sauter dans Tenter En- 
suite, appelei a I'aidc, altnnrirn. 
puis aller au nord jusqu'au "hall" 
Amene ensuite quelqu'un de fort 
pour ouvnr le coffre qui s'y 
trouve. Tu veux trouver Fels- 
trong, Bandoine ? Va au Rankle's 
hall et saute Puis cherche le pla- 
card ' 

Je m'ecroule dans un fauteuil. A 
ce moment, Panuche entre, suivl 
du Vieux. qui s'exclame: 
"Oiles done, mon cher. ce bort 
Panaud vient de me dire que votre 
charmante niece possede la solu- 
tion d'Adventureland ? 
- Bien sOr, vieux gateux". couine 
la mdme Je deglutis Elle met en 
marcrre un magnetophone d'ou 
son une voix bizarre. 
"Ecoutez", fait-elle en extase. 
"C'est Meyer I" 
J'ecoute la voix caverneuse. 
'Premier tresor, Blue Ox au nord 
do lac Pour le prendre il faut 
avoir la hache et dire dans le ma- 
recage 'bunyon' Le tresor dispa- 
rait el on le retrouve plus tard 
On son du matecage en nageant. 
Deuxieme tresor. Jeweled Fruit. 
qui se trouve dans le Paul's place 
en compagnie de la nache et de 
Blue Ox Troisieme et quatrieme 



tresors cles dans I'arbre. II faut 
descendre dans la souche creuse, 
lieu on Ton doit deposer les tre- 
sors. En frottant deux tois la 
vieille lampe, un genie apporte 
I'anneau de diamant et le bracelet 
du meme metal. Pour le cin- 
quieme, il suffit de descendre 
pour trouver le Pot of Rubbies. 
Les tresors 6 et 7 se trouvent 
dans le labyrinthe, il s'agil dun 
Persian Rug et d'un Golden Net 
Pour en sortir, il faut avoir le Rug 
et prononcer deux foi'j Away Sui- 
vant. c'est le huitieme. ie Gol- 
den Fish Pour le capturer. il faut 
avoir la bouteille pleine d'eau et le 
Golden Net Neuvieme le Royal 
Honey II faut prendre du Mud el 
la bouteille vide puur capturer les 
abeilles qui se trouvent dans la 

Biece hexagonale du souterrain 
Ixieme: les abeilles servent a 
faire fuir le dragon qui laisse ses 
Dragon's Eggs Mais il faut que le 
Mud soit tombe sinon le dragon 
vous mange Onze et douze. rem- 
plir le Bladder de gaz et le deposer 
dans la chambre royale Allumer 
le gaz L'explosion rouvre la fene- 
tre muree et laisse un trou II faut 
y aller et sauter le Chasm, e! on 
se retrouve face a un ours donl 
on se debarasse en criant On 
peut alors prendre le Magic Mir- 
ror, aller sur le trone et prendre 
la Gold Crown II faut deposer le 
miroir sur le Rug sinon il se 
brise. Trelzieme et dernier il faut 
faire une digue avec les briques 
refractaires tout au fond du laby- 
rinthe, la ou se trouve la lave On 
refroidit alors les Fire Slones avec 
I'eau du lac Quelques conseils 
pour terminer il faut utlliser le 
Mud pour guerir les morsores des 
Chiggers et pour sen debarasser 
on les transports dans I'arbre 
avant de labattre Pour ressusci- 
ter quand on est mort. il faut aller 
a I'Est. ' Silence Meme le chant 
et les eructations du gros se sont 
tues Mais une voix tenue vient 
rompre le silence la voix de Fell- 

"Tu sais, Doinet. moi aussi, je 
my -hj . _- mise. . 

- Maman ? Toi aussi ? 

- Bien sur Mais tu sais, |e suis 
vieille, je me contenle d'un Mini- 
tel. Tu sais qu'il y a un tres bon 
horoscope chinois sur le 614 91 
66, sur E2, qui vaut largement 
celui du PL tout en slant moins 
cher ? Et tu sais qu'il y aura blen- 
tflt un serveur nomme AAAA tou- 
jours sur le 614 mais qu'il esl ac- 
cessible en ce moment en 300 
bauds par le (11 876 4567 ? Et 
qu'on a acces a la direction gene- 
rale des telecoms par le 613, en 
tapant 176000695 puis DRTRO ? 
Et aux commandes de lourmtures 
aux tfileboutiques en tapant 
133000521 ou 133000428 ou en- 
core TDAAT ? Et au tableau de 
bord PTT par le code TBDGT, tou- 
jours sur 613 ! Et que dans ce 
dernier cas, le code des telebouti- 
ques est DTIF J Et que sans Phi- 
lippe B, je ne I'aurais jamais 
su ?" 

Tu sais quoi '' Les evenements se 
succedent a une telle Vitesse que 
je vais etre oblige de changer de 
chapitre pour te laisser respirer 
Croa ? 



POLYGONE ET POLYFICHE SONT 
DANS UN BATEAU 



Les programmes pour le Mac 
ne se precipitent pas encore 
au portillon. c esl peut-etre 
pour cette raison que les plus 
mauvais softs sont mis sur le 
marche sans honte Exem- 




plaire pour iiiustrer cette de- 
marche Polygone informati- 
que propose un superbe 



utilitalre de gestion de fichier 
Que meme sur le ZX de mon 
petit cousin il y a mieux 
Vous avez acces aux reac- 
tions habituelles du Mac 
(horioge, bloc-note et ciacu- 
latrice) en plus des carnets 
d adresses que gere Polyfi- 
che (original ] Vous vous 
baladez dans vos fiches avec 
la souns (inattendu ) Seul 
gag de I engin Mac peut 
composer les numeros que 
vous lui indiquez Sinon 
qu allez-vous laire dans cette 
galere le soft est lent, les 
fiches ne peuvent garder plus 
de deux numeros de tele- 
phone une adresse, deux 
dates de rendez-vous . Et 
devinez le pnx ' Ouais 800 
balles sonnantes et trebu- 
chantes L'enfer Heureuse- 
menl que Polyfiche et Poly- 
gone tombent a I'eau I 



LE GUIDE DEL' HEBDO 
GALACTIQUE 



Quelques -uns d'entre vous 
connaissent certainement Le 
Guide Ou Routard Galacti- 
que Cela a ete successive- 
meni une serie radiophoni- 
que sur la BBC, 4 tomes 
(normalement, Jean Bonne- 
foy devrait etre en train de 
traduire le quatrieme en fran- 
gais), une serie televisee. 
deux disques et une piece de 
theatre Bref. c'est une revo- 

Et les plus subtils d'entre 
vous onl de]a compris ou je 
voulais en venir il existe 
maintenant sous forme de lo- 
giciel. actuellement pour 
Apple. et bientot pour 
Commodore 64 Le |eu se 
deroule unipuemenl en mode 
texte. et bien sur en anglais 
Ceux qui connaissent le bou- 



quin peuvent aller apprendre 
I'anglais sous hypnose en 15 
jours, ca vaut vraiment le 
coup. L'histoire du jeu est 
aussi drole que celle du livre, 
el bien que le debut soit le 
meme, le schema diverge au 
fur et a mesure de la pro- 
gression du logtctel Heureu- 
sement 




ALIEN : 
APPROCHE DE LA BETE 



Durant la deuxieme moitie de 
lannee 1978, une grande 
partie des studios Pinewood 
(celebres studios anglais, ou 
furent tournes notamment les 
James Bond, Dark Crystal et 
Greystoke) etaient fermes au 
public, et meme a I'ensemble 
de la profession. On voyait 
Dah O'Bannon, le scenariste 
de Dark Sfar, rummer dun 
air maussade dans les cou- 
loirs. Ridley Scott, reahsateur 
de pubs et de "Duellists" 
n apparaissait qu'aux heures 
des repas. Carlo Rambaldi, 
auteur de lextra-terrestre de 
Rencontres du troisieme 
type, et plus tard de E T 
emergeait de temps en 
temps de lambiance sur- 
chauffee du plateau Sur les 
portes hermetiquement 

closes, des panneaux portant 
des inscriptions: 
"N'approchez pas, ca mord I" 
Malgre I'apparence bon en- 
fant de ces precautions, ie 
secret etait bien garde Rten 
ne filtra jusqu'a la sortie du 
film en salle en 1979 Alien 
elait ne Aussitflt, il devint un 
"chartbuster", un casseur de 
records. II est classe parmi 
les vingt films ayant fait le 
plus d'entrees dans le 
monde 

Un vaisseau de transports 
commerciaux revient vers ia 
terre, charge de 20 millions 
de tonnes de minerals 
L'equipage est en hiberna- 
tion, car la duree du voyage 
est de deux ans Mais I ordi- 
nateur de bord les reveille six 
mois avant la date prevue: il 
y a des signea de vie sur une 
planet© non repertonee Prio- 
rity absolue, les membres 
partent explorer cette pla- 
nete. et y trouvent un vais- 
seau etranger 6choue, de- 
truit, el une colonie d'oeuls 
eiranges, qui se revelent 6tre 
bien vivants, et vont meme 
jusqu'a attaquer lun des 
hommes. De retour dans te 
vaisseau, II "accouche" d'un 
monstre, qui grosslt, grossit, 




et devient quasi-mdestructi- 
ble. .. 

Aujourd'hut, un jeu est tire du 
film, reprenant l'histoire de 
tres pres Le but est de jeter 
fallen par un sas du vais- 
seau, si possible en restant 
vivant. mieux encore en pre- 
servant la vie des autres pas- 
sage's La reussite absolue 
consiste a sauver tout le 
monde, y compris le chat 
Jones 

Le joueur dinge les sept per- 
sonnages en meme temps, 
en donnanl une succession 
d'ordres a chacun Les deux 
seuls caracteres que fon ne 
peut pas dinger sont falien 
lui-meme et le chat, ce 
deuxieme ayant une fS- 
cheuse propension a aller se 
fourrer dans la gueule du 
premier 

Les graphemes n'ont rien 
d'ongmal Ce ne sont pour la 
piupart que des schemas des 
divers eiages du vaisseau 
Mais neureusement, une 
grande part d'aleatoire esl in- 
troduite dans le deroulemenl 
pour pouvoir jouer autant de 
fois qu'on le desire sans pour 
autant connartre la tin. 
Le logiciel existe pour fins- 
tant sur Commodore 64, et 
sortira prochainement pour 
Spectrum el Amstrad 



LA MEMOIRE VIENT AVEC L'AGE 



Info Systemes propose des a 
present des extensions pour 
le Canon X07. Deux solu- 
tions vous sont offertes une 
40 Ko RAM et une 32 Ko 
ROM La premiere est ali- 
mentee par une pile au mer- 
cure ce qui garantit une me- 
morisation duranl 10 ans des 
programmes que vous y avez 
place Pour ce qui est de la 
32 Ko ROM, il s'agit dune 

FPROM autnricant Is ca.iuP- 



Dernier detail pour la ROM: 
les temps d'acces s'echelon- 
nent de 250 a 450 nanose- 
condes. Pas terrible: c'est 
superieur au temps d'acces a 
un disque dur ou a une dis- 
quette. M'enfin, c'est deja 
plutot bien pour cette ma- 
chine si demunie en me- 
moire I 



Hebdo, nous avions inter- 
viewe Claude TAIEB, presi- 
dent d'Oric France, a propos 
notamment de lavenir de la 
societe One II nous avail 
promis le remplacement de 
lancien DOS (Systeme d'ex- 
ploitation de disquettes) One 
pour le nouveau gratuite- 




ment Une certaine contusion 
semble regner a ce propos 
car Micro-Programmes 5 
vient de commercialiser un 
DOS au prix de 440 francs 
Hormis le fait que le pnx soit 
absolument prohibitif. 



pas sur celui-ci. mais sur 
I hypotnetique DOS venant 
d'Onc Angleterre Nous vous 
rappelons que les seuls liens 
entre Micro-Programmes 5 et 
One sont des liens tamiliaux 
entre ies presidents de ces 
dtfferentes societes D'autre 
part, One France a largement 
diffuse un communique de 
presse dans lequel on nous 
assure que la fabrication des 
lecteurs de disquettes n'a 
pas cesse II s'avere cepen- 
dant toujours aussi difficile 
den obtentr Par centre, le 
I Stratos est offioellement an- 
nonce 5 mois avant la date 
prevue car les articles parus 
dans divers journaux ont em- 
peche le secret d'etre main- 
tenu plus longtemps Plus ga 
va. plus il est decevant. ce 
pauvre Stratos 



C'est nouveau, ca vient de sortir 



MANDRAGORE SUR 
LE HARICOT 



Nous, on etait contents, on 
avait enfin acquis LE jeu de 
role en francais, anime et 
tout et tout ! D'Emprunt (mon 
copain, c'est son nom) et moj 
on avait done dans une main 
la bofte de Mandragore et 
dans I' autre un C64. On a 
commence par lire le petit 
scenario au depart. Super I 
On commencait deja a rever. 
Et puis il a failu s'attaquer au 
jeu lui-meme Heureusement 
D'Emprunt est un specialists 
des jeux de role. Alors on 
s'est dit dans nos petites 
tetes de ludophages pas de 
probleme: Mandragore ca va 
nous durer trois heures I 

Trois heures ? Oui mais pas 
a jouer. C'est le temps qu'il 
nous a fallu pour preparer le 
jeu. Un bref resume de Tac- 
tion s'impose. Vous avez 
deux cassettes au depart; 
une "programme" et une "fi- 
chier". On a pris le mode 
d'emploi et on I'a suivi scru- 
puleusement: chargement de 
la cassette programme et re- 
copie des dix donjons conte- 
nus dans la cassette fichier. 
Ca ne nous a pris qu'une 
heure et quart pour y arriver. 
On etait prels a jouer. Pas 
encore ? Ah oui. il faut creer 
une equipe de quatre 
joueurs. On s'y attaque la 
joie dans lame. Premiere 
surprise: les magiciens sont 
croulants (force lirfiitee a 10), 
les voleurs moches (aspect 
au maximum a 11) et les 
sages maladroits (dexlerite 
de 1 1 au maximum)... Je sais 
pas ou ils ont peche cette 
idee foireuse, mais d'Em- 
prunt et moi on avait jamais 
vu ca et pourtant Donjons et 
Dragon on connait. Bon, on a 
lim par I'avoir notre 6quipe: 
une heure pour la creer et la 
sauver sur une cassette, On 
commence le jeu ? Ouais I 




programme nous 
mande la cassette "jeu". 
C'est laquelle ? Nous on a 
jamais vu de cassette jeu. 
Trois essais pour la victoire: 
il s'agissait de la cassette 
programme {entre temps, le 
programme avait plante: ges- 
tion basic au moms pour la 
premiere partie !). On s'atta- 
que enfin aux choses serieu- 
ses. Tout est desesperement 
lent. Toutes les commandes 
doivent etre validees par Re- 
turn, y compris !es deplace- 
ments. On est loin des per- 
formances d'Uilima III. Un 
bon graphisme et des 30 
epoustoufiantes, accompa- 
gnes d'une animation rapide- 
ment enervante (trop lente) 
constituent les seuls aspects 
positifs du jeu. Tous les 
echanges de commandes 
prennent un temps dementiel 
pour obtenir finalement des 
"erreur de synlaxe" et autres 
"commands inconnue". Ah I 
Si I'on pouvait se faire 
comprendre a demi-mot, 
qu'est-ce quit serait bien ce 
logiciel, une fois ecrit en Ian- 
gage machine ! Profitez-en 
quand meme, c'est le seul 
jeu de ce genre pour C64. 



BEAGLE PEIGNE 
VO/T DOUBLE 



BEAGLE BROS, les deli- 
rants, les malades de la pro- 
grammation. les seuls mar- 
rants de iinformatique (avec 
nous) viennenl de sortir un 
nouveau logiciel de dessin en 
double-haule resolution: Bea- 
gle Graphics Ce programme 
vous permet de disposer de 
nouvelles commandes Apple- 
soft qui offrent la possibility 
de dessiner des graphiques 
16 couleurs en Basic Elles 
comprennent une routine de 
remplissage, une routine de 
texte en page graphique, la 
plupart des commandes nor- 
males ont ete reecrites 
(HPLOT. DRAW. SCALE) et 
d'autres ont ete rajoutees 
(FILL, BCOLOR. MODE) Ca 
marche avec souris, joystick, 
Koala Pad ou clavier. Le pro- 
bleme est que le programme 
de dessin est ecrit en Basic 
et que done c'est tres lent. Le 
texte 80 colonnes graphique 
est ilhsible en couleurs (ge- 
nant). et la routine de rem- 
plissage teflement lente que 
je prefere remplir le dessin a 
la main. II y a aussi un zoom 
qui permet de reprendre a la 
loupe, sauf avec la souris, 
I'uiilisation de ce logiciel 
n est pasevidente 
On peut aussi dessiner en 
double-basse resolution 

{c'est vrai t), convertir des 
grapniques HGR normaux en 
doubie-haute (le resultat est 
assez etrange). convertir les 
commandes Applesoft dun 



programme en commandes 
double-haute ou double- 
basse et compacter les 
images afin de gagner de la 
place sur la disquette Enfin. 
plusieurs types de caracteres 
sont drsponibles sur la dis- 
quette et un programme spe- 
cial vous permet de fabriquer 
les votres. Les fous ont peut- 
etre vouiu sortir leur logiciel 
un peu trop vite. mais la pos- 
sibility de programmer en 
Basic est un bon double- 
haut-point 




Graphics est dislnbue 
en france par SOFTMART au 
prix de 750F environ Pour ce 
prix, je machete 16 disques 
de Mireille Mathieu (1 par 
couleur !), 81. 52 pots de Nu- 
tella, 1.78 abonnements a 
Hebdogiciel ou 0.17% dune 
Porsche 911 SC CARERRA. 
rouge avec les sieges en cuir 
blanc a pois mauves. 



C'EST SOFTMART QUI DISTftlBUERA 
DESORMAIS LES PRODUITS LOTUS ! 



VROOOOM, 
SINCLAIR ROULE POUR VOUS ! 



Lord Sinclair marche a cote de 
ses pompes et il sen rend bien 
compte, le bougre I Apres avoir 
presents sa mini-television qui 
avait encore un petit rapport 
avec ses activites inlormatiques, 
il se lance dans la voiture elec- 
trique qui n'a plus du tout rje 
rapport avec la micro II vient de 
devoiler son engin qui est une 
horreur de monopiace decou- 
verte en forme de cigare et qui 
ressemble plus a un solex a 
trois roues qua une voiture. 
L'autonomie d'une trentaine de 
kilometres n'apporte stfictement 



aucune amelioration par rapport 
aux generations precedentes de 
ce type de vehicufe et le prix de 
7 000 et quelques francs est 
loin d'etre revolutionnaire 
C'Stait quand meme plus facile 
de se lancer dans un secteur de 
poiite comme Iinformatique, 
n'est-ce-pas SirClive ? 
Dis, pourquoi Eu as dit qu'il se 
rendait compte qu'il marchait a 
cfjte de ses pompes ? 
Ben, parce qu'il a fabrique une 
voiture pour ne plus avoir a 
marcher, banane. c'est pourtant 
simple, non ? 




COMMUNIQUONS 



Euh... Bonjour, euh... Je... Le 
digitelec 2000. c'est euh.. ur, 
modem qui euh. ne euh 
enfin, euh, quand la 
mais si la premiere hgne 
d'ecran est occjpee, euh 
enfin, comment dirais-je, si 
Apple, ben., on la voit pa 
enfin.. Bref, euh... si vous 
voulez. le digitelec ne permet 
pas de visuaiiser la premiere 
ligne d'ecran sur Apple, et 
euh... c'est emmerdant, quoi, 
euh, enfin, embetant. mats 
je... c'est comme, je veux 
dire, par exemple. euh... sur 



Stei. par exemple. eh ben pa 
marche pas. mais euh... ca 
marche pas, quoi... 
Quand meme, on a beau dire 
mats la communication, ce 
sont les hommes qui en par- 
lent le mieux. 




PLUS DURE SERA LA CHUTE ! 



II etait temps '. Pour la pre- 
miere fois depuis cinq ans. 
I'mdustrie du jouet eiectroni- 
que est en pleine recession. 
Les consoles ne se vendent 
plus et sont inconsolables. 
Les gadgets de pocnes et 
autres bip-bip insupportables 
se prennent une gamelle 
d'enfer au hit-parade des 
gmards. C est done le grand 
retour des poupees, des jeux 
en boite carton, des petites 
voitures et des dinettes. 
On va pouvoir enfin tirer un 
trail sur les baiarlles navales 
electroniques. les bataMles 
spatiales inlormatiques, les 
robots laveurs ou autres fou- 



talses sans ame 
Nous, ce quon veut, c'est 
que nos momes jouent au 
papa et a la maman. au doc- 
teur et a la malade. au petit 
chimiste et a son assistante 
II semblerait que ces nouvel- 
les tendances soient repre- 
sentees en force au dernier 
salon du jouel. Je dis 
"BRAVO". 




MEGAGAMES, MEGAFLOP 



Avant de sombrer dans les 
meandres du depot de bilan. 
Imagine avait annonce la 
mise en oeuvre de deux 
"Mega-jeux'', Psyclapse et 
Bandersnatch. Ce dernier 
vient d'etre rachele par Sin- 
clair qui envisage son adap- 
tation sur le QL Le principe 
de ces jeux es! complique 
(pour une fois!): le joueur doit 
entrer dans la peau d'un per- 
sonnage qui peut n'agir sur 
son environnement que dans 
les limites de la credibility 
Plusieurs nouveaux concepts 
derives des recherches sur 
I'mtelligence arlificielle font 
leur apparition dans ces jeux. 
Par exemple Taction impli- 
cite: lorsque le personnage 
s'approche d une porte, il est 
evident que c'est pour I'ou- 
vrir De la, toute la program- 
mation peut etre simplitiee 
pour laisser la place a I'ani- 
mation et a la musique D'au- 
tres procedes apparaissent: 
Tun deux est directement 
inspire de la bande dessmee. 
puisqu'il s'agit de phylacte- 
res, ces bulles qui apparais- 
sent au-dessus de la tete 
dun personnage lorsqu'il 
parle. Ainsi, plus besom de 
specifier certains details 
dans un cadre en bas de 
I'image: les dialogues entre 
les personnages vous indi- 
quent ou vous etes, qui sont 
ceux que vous rencontrez, ce 



qu'ils pensent (eventueile- 
ment de vous, si vous surgis- 
sez a Timprovtstel). 
Dans Bandersnatch, vous 
etes Vel, un ex G.I. de retour 
du Vietnam. Vous vous exilez 
sur une planete lointaine pour 
fuir la civilisation, mais vous 
n'y etes pas seul. Dans Psy- 
clapse. vous etes Johnny 
Nam, mysterieusement tele- 
porte dans une forleresse sur 
une planete inconnue, dans 
laquelle rodent des guerriers 
venus d'autres temps. Le but 
commun de ces deux jeux: 
survivre. 

Les programmers se decla- 
rent ravis du resultat, et de- 
cretent que ce sont les meil- 
leurs |eux jamais fails C'est 
dommage que la societe ait 
tail faillite, j'aurais bien aime 
les voir. 




LA PROFUSION 

Manic Miner qui existait jus 
qua present pour Spectrurr 
et Commodore vient d'etre 
edite pour MSX. Rappelons 
que Manic Miner est I'une 
des 10 meilleures ventes de 
logiciel en Grande-Bretagne. 



L'ANTISOURIS 

La socifete" allemande Teldix 
commercialise une poignee 
de commandes pour Apple et 
IBM PC basee sur le principe 
inverse de la souris. Vous 
disposez d'un "Trackball" et 
de trois boutons de 
commande pour manipuler 




branche sur la sortie seTie du 
micro. Elle coute actuelle- 
ment 700 marks . (environ 
2500 francs) logiciel de ges- 
tion compris. Son interSt pour 
les possesseurs d'Apple 
reste particulierement limite: 
elle ne fonctionne pas sur 
tous les softs geres par la 
souris. Teldix envisage nean- 
moins de commercialiser une 
nouvelle version bon marche 
(550 francs) qui offrirait une 
compatibilite a 100 % 
Bonne chance I 



EH LES MECS ! METTEZ VOS LUNETTES DE SOLEIL, 
DIEL EST AVEC VOUS... 



Que tous ceux qui affirment 
que Lode Runner reste le 
meilleur jeu d'arcade jamais 
concu posent ieur walkman, 
arretent de faire des papouil- 
les a leurs pelites copines, 
coupent Dallas ou Chateau 
Vallon, stoppent leur voiture 
sur la bande d'arret d'ur- 
gence, d^connectent leur Mi- 
nitel et ecoutent. Euh... Li- 
sent plutot 

Comme je m'embete cruelle- 
ment les copainsl Depuis que 
je viens de terminer le cin- 
quantieme tableau de Lode 
Runner Championship, je de- 
viens neurasthenique. Aussi 
une idee plus que fantasti- 
que, puisquelle est a propre- 
ment parler geniale et qu'elle 
est sortie de la tdte da cdte 
de la mienne. va secouer les 
rangs des Champions. Vous 
avez tous cree des tableaux 
grace a Tedrteur inclus dans 
le premier Lode Runner 
Alors il ne vous reste que 45 
secondes pour me les expe- 
dier vite fait Vous n'avez pas 
le droit den fabriquer des in- 
faisables: si vous en voulez. 
je vous en donne six tonnes 
tout de suite Si vous en avez 
des beaux, drdles. Insolites. 
incroyables mais ... (merci les 
choeurs), impayables.. vous 
me les sauvez sur une belle 
disquette pour Pomme ou 
pour C64 et vous affranchis- 
sez en port express, recom- 
mande, assure, controle par 
huissier. . Qu'est-ce que ca va 
vous rapporter? Notre consi- 
deration eternelle (deux mi- 
nutes au moins). De plus, le 
meilleur aura le droit de rfecu- 



perer une disquette avec nos 
tableaux et on publiera la 
photo d'ecran dans I'HH- 
Hebdo. Vous voyez )e plan 
d'icii Pas de probleme, des 
que Ton aura plante toute 
votre oeuvre, on vous ren- 
verra les resles de voire sup- 
port affectif et magnetique. 




Dernier point: des pelits 
ruses m'ont affirme qu'il etait 
possible de mater les ta- 
bleaux de L.R.C grace a 
Tediteur de L.R, Pour le C64, 
ga ne marche pas. Pour TAp- 
ple, c'est pas terrible non 
plus Dans ie style, vous pou- 
vez trouver encore pire 
comme idee: prenez une dis- 
quette bien pleine (jeu 
d'aventure graphique par 
exemple) et essayez d'editer 
des tableaux quelconques 
(toujours grace a i'editeur de 
L.R). Vous pourrez decouvrir 
mes fameux niveaux totale- 
ment injouables. Mais c'est 
rigolo, pendant cinq minutes. 
Enfin, si quelqu'un parmi 
vous a trouve comment 
transferer I'editeur de L.R sur 
la disquette de L.R.C, il doit 
I'envoyer a la grenouille! 



On est sur L.R? Alors on 
continue: Software Projects a 
recupere les droits du soft et 
a realise une version pour le 
Spectrum. Impossible de 
vous dire quelle gueule ga a, 
dans la pub ils ont mis des 
photos d'ecran du C64. Arna- 
que? L'avemr (qut est tres 
clement) nous le dira Suite 
au prochain episode spectru- 




Suite fe ta page i 

Le SQUALE. umle cenlrale est 
cole prts de 3400 lis les tiois 
bios Le moniieur couleur qui 
est un asianque recairosse pout 
la circonstance vous coutera 
3422,79 'is Mais voire ieie avec 
pfise pentel fen aussi bien laf- 
laire L impnmame COUleur navi 
gue dans les 2000 dalles, et i un 
pnmante noir el blanc 80 
coionnes dans les 3200 frs 
Le BUS d extension cartonne dans 
les I200frs Le lecteui de dis- 
quetles 5 pouces 1/4, 500 ko 
vers les 2800 Irs 

Steeve vous parle son pull marm 
contre votre bonnet a pompon 

Sue tout ce beau materiel est 
ores et deia dispomble II aiouie 
pour vous allecher que le joys- 
tick, le light pen et autre carte 
syntnetiseur de parole le som 
egalement ' Verifier Chez votre 
revendeur 

LESLOGICIELS 
DU CAPITAINE 

'On est en tram de terminer les 
pochettes, (lit Steeve Mais |e 
peux deia vous en citer quetques 
uns qui seronl dlsponibles des la 
sortie du squale, 



cassette OU en disquette * 
Vous demands? a von parce que 
vous avez lu 1 evangile selori Saint 
Thomas 'Ah mince ' J'ai oubhe 
de its amenei ' 
Ce coup la. on vous i a deia tait 
Mais comme vous Me* plutdt de 
bonne numeur ce matin vous lui 
laissei le benefice du doule 
Xroyez-moi insists Steeve II y 
aura tout ca et bien plus encore 
des jeux d aicade des jeux edu- 
cates, des ieux d'aventuie ei 
meme tous les 'ogiciels de chez 
Hatier MAie 'I' 





Pour les langaoes 
BASIC. LOGO PASCAL. ASSEM- 
BLEUR/EOITEUR. FORTH, LAN- 
GAGE C Pour les aprjiications 
Traitenwit de texie. ARl volume 
en trots dimensions. ARl color 
gestion de fichier. agenda mmitel 
et dynacaic 
El tout ca en ROM PACK OU en 



TERRE { TERRE t 

Une mouollo rleuse viant plainer 
autour du mat de misame C est 
slgne que la terra est toute pro- 
che et qu'll est temps de 
conclure Le patron de chez 
Squale vous remercie et saute 
dans son hors-borrj "Excusez- 
moi, ]e me depeche. j'ai un ren 
dez-vous avec I'Armee Irancaise 
lis sont tres interesses par notre 
micro I" 

Vous remballez votre peche, un 
peu decu de ne pas avoir pu tes- 
ter de bons programmes bien 
frais Mais de|a une fioppee de 
Bretonnes en coiffure font sautei 
des crlpes sur le quai du port 
pour feter votre retour 
Ce nest que dans queiques jours 
que vous saurez si le Squale s'est 
bien vendu sur le marcne Apres 
lout, ii a de bons atouts sous son 
aileron, une grosse memoire. un 
ban clavier et un bon graphisme 
Rapport qualne'pfix, cest encore 
moms cher que du Thomson 



CAPITAINE NEMO 



INDIANA JONES 
CONTRE CBM64 

Apres ies foueis en piasii- 

Sue. les Indiana Jones gon- 
abies. !es peiuches de I he- 
roine, ies maquettes de 
temples m audi is et autres 
produiis formant ce aue ion 
nomme communement le 
"merchandising*, voici enfin 
le logiciel n lourne sur 
CBM64. reprend assez 'rde- 
lemeni les elements du film 
(le premier), mais maiheu- 
reusement ce n est plus du 
70mm Dolby stereo Malgre 
le grand nombre de tableaux, 
les dessms sont tres dece- 
vants et Indiana lui-meme 
ressemble plus a un sprite 
mal tail qua un vrai heros 
Dommage que Spielberg ne 
programme pas ses ieux lui- 
meme 




DEUX SUPER-CONCOURS PERMANENTS 



20 000 francs de pnx au MEILLEUR LOGICIEL du MOIS et un VOYAGE Dour 2 
personnes en CALIFORNIE au meilleur logiciel du TRIMESTRE 
Un concours de plus! Mires a (utilisation de ce pro- 

Rten de Men original dans gramme, 
cette formule, pourtant nous Bonne chancel 

Reqtemenr 

ART 1 HEBOOGICIEL organise 

de facon mensueUe el tnmes- 

tnetle un concours dole de pnx 

recompensant le meilleur logiciel 



essay ons de (aire quelque 
chose de different: nous orgs- 
nisons un concours perma- 

rtent ious les mois el iouk les 
trirnestresF Et avec des prlx 



Oe plus, ce seront les lecteurs a lout ^lew de logicie' quelque tout momeni 



ART 6 Le prix aHoue pour le 
concours trimeslnel sera remis 
au plus lard un mois apres la 
cttlure du concours trimeslnel 
ART 7 Le present reglement a 
ete depose chez Uaitre Jauna- 
trs 1 rue des Haiies 75001 

ART 6 HEBDOGICEL se re 
serve le droit dmterrompre a 

present 



concours en avisant les lecteurs 

on mors avanl 

ART 9 La participation au 

concours entraine 'acceptation 

par les concurrents du present 

reglement 



HEBOOGICIEL: 27 I 
Foy 75008 PARIS 



i du Gal 



eux-memes qui voteront pour ^ te maj^nei sur lequel ii est 
leurs programmes preferes realise L envoi dun logiciel en 
sur la grille recapitulative K7 ^ sju|| accompagne 
mensuelle. <j- un bon de participation de- 
Pas de jury, pes de decision ,-oypg ^j HEBOOGICIEL 
arbitraire, HEBDOGtCIEL n'in- constin^ i acte de candidature 
tervenant que dans le choix ART 3 La redaction d HEBOO- 
des programmes qui devront GICIEL se reserve la droit de 
etre ORIGINAUX et FRAN- s etect)0fln er sur la base de la 
CA1S. SI votre programme gujM et de I onginalite les logi- 
n'est pas tout a fait au point. aels qu , sont publics dans le Sera declare gagnant le pro- 
un de nos specialistes vous journal gramme qui aura obtenu Is 
dira comment rameliorer poor ART 4 ^e sont les lecteurs qui. plus fort pourcenlage de vote 
pouvolr nous le proposer a p^ 1eur vo(ei deiermineni les per rapport a la totalile des 
nouveau. meilleurs logioels mensuels et programmes recus pour un 
Pour participer, II vous suffll trln -eslneta 
de nous envoyer vos pro- A.RT5 La pnx aHoue pour ie 
grammes accompagnea du cyr icours mensuel sera remis au 
bon de participation ainsi que p [ us tarf j un mo(9 apres la clo- 
toutes les expltcallons neces- ture flu concours mensuel 



meme ordlnateui. 
Ainsi. pas de fsvoritisme pour 
les ordlnateurs plus pulssants 
ou trts diffuses. 



BON DE PARTICIPATION 



Pre no m 

Age Profession 

Adresse 

M telephone 

Mom du programme 

Nom du materiel utilise 

declare etre I auteor de ce programme qui n esl ni une imitation ni une 
copte d un programme existent Ce programme resle ma prophets el 
autorise HEBDOGiClEL a le puhtier La remuneration pour les pages 
oubdees sera de IOOO francs par page tun programme n occupant pas 
jne page entiere sera remunere au prorata de la surface occupeel 



e programme doit eve expeoiesui support magneiique (cassette ou 
isquettei accompagne dun descnptit deta<»e du mat«nei ulilise 
1 une notice d utilisation du programme Les supports des program 
i putn'ies som conserves n oubiiez done pas d en 'aire une copie 




GAGNANT I. 
CONCOURS MENSUEL 
Jacques GlRARD pour son 

aramme FLEUVE 

GE sur TRS 80 gagne 
20 000 Francs 




PROGRAMMES TV 



Hello, happy tax-payers, ac- 
crocs du clavier et autres lec- 
teurs Vous craquez sur votre 
jeu-video. bioquts au niveau 2, 
vous voulez supplement vous 
changef les idfies, HEBDOGl- 
CIEL est encore la Branctiez- 
vous sur la television, son cacfa- 
vre est encore vivant, les bande- 
rllles de CANAL + ont reveille !e 
monstre assoupi 
CANAL + mfcne la danse avec 
un depart digne d'une formule 
1, mais attention il s'agit d'une 
epreuve d'endurance Malg/e un 
tir de barrage des trois vieilles 
dames. CANAL + gagne ta cate- 



goric film cette semaine June 
douzaine d'inedits et pas des 
moindres : 1941, MEURTRE 
DANS UN JARDIN ANGLAIS, 
VIVRE VITE, LA CHUTE DE LA 
MAISON USHER. JE SUIS UN 
CRIMINEL et HORIZONS 
PERDUS une rarete de F.Capra 
(1937) en V.O le 5 a 14h00, le 
7 a 10h25). 

ANTENNE 2 reagit intelligem- 
menl en produisant des series 
bien ticeiees. et FR 3 renouvelle 
sa grille en 1986, je vous en 
toucherais tin mot la semaine 
proehaine 

TB 



Voila un film qu'il est fou feu 
fou. 

Vous y verrez un sous-marin ja- 
ponais (en perdition), un luna 
park, un pifote americain 
completement givre ne pensant 
qu'a casser du "jap', un general 
US ne pouvant se retenir de ver- 
ser une larme en regardant 
Dumbo, un pilote de char se 
prenant pour une mouche, un 
concours de danse hallucinant, 
un commandant de base ameri- 
cain completement paranoiaque 
voyant des espions japonais 
partout, la secretaire du general 
sus-cite qui ne reve que d'aero- 
planes et de beaux pilotes, un 
pere de famille qui joue les 
hSros et dStruit sa villa, un offi- 
cier allemand qui a tendance a 
se prendre pour Dracula. une fa- 
buleuse bataille entre G.I. et 
marines, un avion en perdition 
au-dessus de la c6te califor- 
nienne et un raton laveur. 
Le tout mis en boite par le petit 



1941 



STEVEN SPIELBERG en 1979 
Quant aux autres protagomstes 
de ce requisitoire iconodaste 
nous ne les citerons pas par 
respect envers leurs families 
Diffusion le dimanche 10 a 
22H25 sur CANAL + 




" prets pour les banquets 
d'anciens combattants " 

(photo canal + ) 



MALEVIL... 



Ou Apocalypse mode d'emploi 
(1962) selon C de Challonges 
avec Michel Serrault, Jean-Louis 
Trintignant, Jacques Dutronc. 
L'apocalypse, ga vous inte- 
resse. Avec les frlmas de ces 
dernieres semaines, une bonne 
vague de chaleur vous tente. 
Vous etes moderne, passionne 
par ia technoiogte dernier en (ia 
preuve: vous lisez HEBDOGI- 
CIEL) alors chauffez-vous au 
thecmonucleaire. Voici un petit 
film publicitaire a I'appui <Je ma 
proposition. 

Adapte du roman du meme nom 
de R. Merle, MALEVIL est une 
fable post-nucleaire decrivant la 
vie d'un groupe de survivants, 
de leur communaute et des diffi- 
culty (phy-, meta-et pata-prtysi- 
quss) a 'adaptation au nouveau 
monde. Apres un bon depart, le 
scenario tombe dans un dis- 
cours sociologique archaique 



(loi du plus fort, tribalisme) le- 
quel accumule des situations re- 
petitives dont on se lasse vite 
Cette fiction speculative moralo- 
philosophique permet nean- 
moins d'apprecier I extraordi- 
naire performance de J. Villeret 
(Momo) et ['excellent travail des 
decorateurs et du directeur de la 
photo. 

Diffusion le mardi 5 a 
20h4Q sur A2. 




CLEMENCE ALETTI: Qtiatrieme round. 




RESUME: Comment vous 
n'etiez pas devant votre tele- 
viseur ces deux demiers di- 
manches ? II etait temps que 
cette rubrique existe. 
Dans la quatrieme tranche de 
ce qui devralt etre votre serie 
bien-aimee notre chere CI6- 
mence (D. Labourier), 
commissaire de police de 
son etat, poursuit toujours la 
piste italienne. Lajeune " ter- 
roriste " Livia (coucou la re- 
voila) est apercue sur les 
lieux du crime (une coinci- 
dence ? Non pas). Le 
complice (ou I'organisateur, 
ou la victime (cochez la case 
de votre choix)) de cette ma- 
nipulation n'est autre que 
Marcello, le frere de Livia, le- 
quel vit a Montreal. Aussitdt 
dit aussitdt fait, nos deux se~- 
millantes protagonistes s'en- 
volent pour le nouveau 
monde. 

Ciao ritalie, v'la don' I'Que'- 
bec. 

Tout commence tres bien. En 
quelques heures notre 
commissaire de charme se 



fait subtiliser ses bagages 
(argent, papiers, etc.), 
agresser par un char, en- 
gueuler par les autorites 
francaises, epingler par la 
police canadienne et son ar- 
rivee fait la "une" des quoti- 
diens. De plus la temperature 
a Montreal n'excdde pas le 
zero degre Fahrenheit et 
notre heroine est I6gere et 
court vetue. 

Tout va mat. Alors Zorro ar- 
rive (pseudonyme Qu6be- 
cois: Lafleur). Vous avez 
de/a apercu ce heros myste~- 
rieux aux flancs dechames 
aupres de tous les cadavres. 
Parviendra-t-il enfin a sauve- 
garder une vie. Our la suite 
de fhistoire I'exige. Gr£ce a 
sa potion magique (cafe noir 
brulant) il redonne couleurs 
et espoir a la jeune title per- 
due au milieu des glaces 
(meme pas au cassis). Apres 
moult verres de vin (In vino 
Veritas) Lafleur raconie son 
histoire. Diffusion le diman- 
che 10 a 19hOO sur A2. 




/ 




-v 


Lundi 4 Fevrier 


20h30 


C + 


i VIVRE VITE (voir article). • 


20h35 


FR3 


: POLICE PYTHON 357 (1976), film de 
A. Comeau avec Yves Montand. 


20h35 


A2 


: LA FILLE DE Mme ANGOT (operetta). 


20h35 


TF1 


: DEUX HOMMES DANS LA VILLE 
(1971), film de J. Giovanni avec Alain 
Delon et Jean Gabin. 


22h10 


TF1 


: ETOILES ET TOILES (magazine pour 

cindphagas). 
: THALASSA (magazine qui garde le 


23h05 


FR3 






cap). 


Mardi 5 Fevrier 


20h30 


C + 


. LAMI DE VINCENT (1983), film de 
Granier-Deferre. 


20h35 




: ENIGMES DU BOUT DU MONDE (Jeu 


20h35 


FR3 


ge'ographique et sportif). 
; LA DERNIERE SEANCE : soir&e VIR- 
GINIA MA YO. (voir article). % 


20h40 


A2 


: MALEVIL (voir article). • 


21h40 


TF1 


. CHAMPIONNAT D'EUROPE DE PATI- 
NAGE ARTISTIOUE. 






: LA SCARLATINE (film a eV/ter comma 

la paste). 
: LA CHUTE DE LA MAISON USHER 


C0h20 


C + 






(1960), film (fantastique) de R. Cot- 
man. 


Mercredi 6 Fevrier 


20h35 


A2 


. LE SEUL TEMOIN (dramatique a pleu- 


20h35 


FR3 


: CADENCE 3 (vari6t6s avartees). 






: DALLAS (ca lasse). 






: CONTAMINATION (film a fuir comme 
la scarlatina). 






: CINEMA. CINEMAS (magazine cin6- 
philique). 






: FANCHETTE (dramatique pas foli- 
chonne). 


Jeudi 7 Fevrier 


20h30 


C + 


: TROCADERO BLEU CITRON (film 
pour pedophiles g&teux). 


20h35 




: L'AMOUR EN HERITAGE rf 6 (s6rie 

petit budget). 
: AU NOM DE TOUS LES MIENS rf 1 


20h35 


TF1 






(sans moi, merci). 


20h35 




que a louer ? ). 


21h30 




: INFOVISION (magazine de reporta- 
ges). 
; RESISTANCES (magazine des droits 


21h35 


A2 






de t'homme). 


22h00 


FR3 


; TROIS FRERES (1980), film (rSves 
nostalgiques) de F. Rosi avec Charles 
Vanel. 

: MEURTRE DANS UN JARDIN AN- 










GLAIS (voir article). • 


Vendredi 8 Fevrier 


20h35 


TF1 


■ LE JEU DE LA VERITE (jeu truqut ? 

Mais vrai promo) avec Enrico Macias. 
: CHATEAUVALLON (Dallas sur Loire). 


20h35 


A2 


20h35 


FR3 


: FACE A LA TROIS avec P.Joxe, mi- 
nistre de I'lnte'rieur (prendront-its 
" Fox-Terrier " a rebrousse-poil ? ). 
: DECIBELS DE NUIT (vari&es rock). 


21h35 


FR3 


21h35 


A2 


: APOSTROPHES (V argent et le pou- 

votr). 
: JE SUIS UN CRIMINEL (1939), film 


21h50 


C + 






(policier) de B. Berkeley. 


21h50 


TF1 


: CHAMPIONNAT D'EUROPE DE PATI- 
NAGE ARTISTIOUE. 


23h00 


A2 


: PLACE AUX JEUNES (1937), film (co- 
me' die amere) de L.Mac Carey 


23h35 


C + 


: CONTAMINATION .film Italian (au se- 

cours). 
: MEURTRE DANS UN JARDIN AN- 


00h55 








GLAIS (voir article). • 


Samedi 9 Fevrier 


20h35 


FR3 


; DISNEY CHANNEL (Zorro est arrive). 


20h40 


TF1 


: LOULOUTE (au theatre ce soir). 


20h40 


A2 


: CHAMPS-ELYSEES (Drucker au para- 

dis). 
: DYNASTIE (Dallas en plus salace). 


22h15 


FR3 


22h40 


TF1 


: DROIT DE REPONSE 


23h00 


C + 


: DE SI GENTILS PETITS MONSTRES 
(una horreur de film). 


Dimanche 10 Fevrier 


19h00 


A2 


: CLEMENCE ALLETTI rf 4 (voir arti- 
cle). • 


20h35 


C + 


: LE BAL (1983), film (musical) superbe 

de E. Scota. 
: LE GRAND RAID (jeu d'aventures). 
: DANTON (1982), film (a raccourcir) de 


20h35 


A2 


20h35 


TF1 






Wadja avec Girard Depardieu. 
: ARCHITECTURE ET GEOGRAHIE 




FR3 






SACREE (documentaire mystique). 


22h25 


C + 


: 1941 (voir article). • 


22h30 


FR3 


.- LA CITADELLE DU SILENCE (1937) 






film (m6lo historique) de M.L'Herbier. 



MAYO-WALSH 



Soiree Virginia Mayo-Raoul 
Walsh. 

Notre sympalhique ^rooner 
national sur le relour a en- 
core une fois ouvert sa boite 
a souvenirs: ce soir les pre- 
miers emois e~rotiques du 
jeune Eddy avec. dans le role 
de ia poup£e gonflable (et 
gontiante). Virginia Mayo. 
Captain Horatio Hornblo- 
wer (1951) drame cornStien 
d'1h53mn. 

XVItleme Steele, mers du 
sud, soleil implacable, 
commandant idem. Un capi- 
taine courageux mene a son 
terme une mission difficile 
malgre les Gtements contrai- 
res, /'equipage mutin et la fe- 
melle mutine. 

Cette pellicule est une par- 
faite demonstration du Credo 
maso: 

- tu ne puniras point tes 
sous-ftfres plus qu'il n'est ne- 
cessaire 

- tu renonceras au contort 
(le chef doit montrer lexem- 
ple) 

- tu ne convoiteras point les 
fesses du moussaiilon. 
Chacune des 2 vedettes 
jouent au maximum de leurs 
capacitSs, Gregory Peck dit 
"machoires crispees", Virgi- 
nia Mayo sumommee "braise 
incandescente". 
Colorado Territory (1949) 
Irsgtdie iplque d'1h31mn. 
Un couple tuit a travers les 
immensity dGsertiques de 
I'Ouest: western Spre et sau- 
vage, relents de sueur aigre 
et de cuir recuit garantis (pub 




" mats non, t'as pas un 

grosblair"(PhotoFR3) 

pour deodorant a lentracte). 
Comme d'habitude chez 
Walsh faction prime, la psy- 
chologie est a I'emporte- 
piece, les personnages se- 
condares nombreux et inte~- 
ressants. On notera par ordre 
d 'apparition a I'ecran: le 
grand canyon. Bison Fut6, 
les coyotes. Rintintin, des 
serpents, un Gremlin egar& 
Filme au galop, le scenario 
s'acheve sur un final gran- 
diose. 

Poursuivi par des indiens fa- 
natiques, nos deux cherubins 
trouvent refuge dans la 
crypte locale. Pratiquant les 
tortures les plus raffinees, les 
indiens les maintiennent 
6veill6s toute la nuit en psal- 
modiant des mandalas. A 
I'aube les deux comiques d6- 
gustent une volee d'hosties 
plomb6es (alleluiah), illumi- 
nes par les fleches d'or de 
I'astre sacre' (RB), its crevent 
unis dans la mort (Requies- 
cat in Pace). 

Sauvage et beau. Diffusion 
le mardi 5 a 23h00 sur PR 3. 
V.O. 



VIVRE VITE (1981) film de C. Saura. 



Ca d4coiffe. 

Vous voyez, en 1981 (date 
de sortie du film) quand I'in- 
formatique n'e'tait pas aussi 
re~pandue que de nos /ours, 
la jeunesse etait un chouia 
d6soeuvree et elle faisait des 



Ca part d'un petit rien. une 
bande de Jeunes espagno's 
un peu paumes, fauches (ga 
n'existe plus maintenanl) de- 
cide de faire un coup. . 
Ce dernier re~ussi. on pense 
qu'ils ont assez d' argent, 
mais pas du tout du tout. 
Quand on y prend gout, rien 
n'est trop risque. 
Pour leur deuxieme coup its 
tombent sur le genre de type 
propre sur lui mais arme el 
qui croit qu'a lui tout seul il 
va faire rSgner I'ordre (ca 



non plus ga n'existe plus). 
Pas de bol pour lui. la femme 
(ANGELA) qui en a dans le 
pantalon (des munitions pour 
son revolver) le tue froide- 
ment. 

Une fois de plus comme e'est 
le premier pas qui compte, 
on en tue un autre (un cais- 
sier de banque) et la: police, 
fusillade et tutti quanti... 
Tout le monde il est mort 
sauf deux rescap&s dont AN- 
GELA (y a-t-it une justice di- 
vine... ?) 

Dans le style BONNIE and 
CLYDE on accorde a ce film 
les deux oreilles et la queue. 
Mais attention tout cela 6tant 
si bien mene, on est tente 
d'en faire autant. 
Diffusion le lundi 4 a 20h30 
sur CANAL + . 



MEURTRE DANS UN JARDIN ANGLAIS. 



Attention ce film est un brulot 
social. II taisse entendre que 
le meurtre etait (est) un sport 
de riches. II n'en est rien, les 
raffinements et les joies de 
I'assassinat sont a la portee 
de tous. 

The Draughtsman's contract 
(1983) de Peter Greenway 
est un ravissant bibelot 
d'epoque XVHIeme. Lumie- 
res, costumes, musique, ma- 
quillages reconstituent a la 
perfection la gentry de ce 
temps-la 

Un jeune horn me de modeste 
extraction brille au sein de la 
bonne societe anglaise grace 
a son talent de dessinateur 
et a son impertinence. II de- 
croche un contrat pour un 
port-folio de douze dessins 
d'une gentilhommiere. Avis a 
tous les amateurs de Sher- 
lock Holmes d'Agatha Chris- 



tie et consort ici commence 
le rebus. 

Lors de I'execution des fu- 
sains les details bizarres 
s'accumulenl ; des elements 
du paysage surgissent, ou 
disparaissent, I'artiste joue 
au maitre de maison, il dis- 
pose a volonte de la femme 
et de la fille, et indispose les 
autres invites. 

Tout cela n'est qu'un jeu 
mais qui manipule qui, that is 
the question ? 

Allez on va vous aidez : oil 
est passe !e maitre des 
lieux ? Qui est le nudiste ? 
Quelle importance a le ta- 
bleau du petit pavilion ? De- 
vinez I'age du capltaine du 
Seme regiment du Kent ? 
Diffusion sur CANAL + le 
jeudi 7 a 22h05, le vendredi 
8 a 00h55. 



A j m 



' Otez-vous de mon soleil "■ (Photo Canal t ) 
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APPLE 

VENDS Apple He + duodisk + 
joyslick + carte chat mauve (64 
KO dextension + couleur + 80 
colonnes) + environ 100 pro- 
grammes (materiel sous garan- 
tie]: 17.000 F F. LIBSIG 1 rue 
Charles Peguy 68300 ST LOUIS 
Tel: (89) 67 02 59. 

VENDS APPLE II+ 64K + 1 
drive + moniteur vert + contro- 
leur + carte langage, RS 232C, 
coulsur, synthetiseur de parole 
+ joystick + nombreux softs: 
9000 F. david CLOUGHER Tel: 
260 87 86. 

VENDS lecteur de disquettes 
(Disk II) sans conlrdleur: 2500 
F Serge MARINER Tel: (38) 53 
86 04 (apres 19 H) 

VENDS APPLE lie + 2 drives + 
carte CPM / moniteur vert + lo- 
giciels: 12500 F. Alain RO- 
ZAWSKI 8 avenue Simon Boli- 
var 75019 PARIS Tel: 205 93 31 
(la journee} ou 358 05 61 (de 19 
a 21 H). 



CHERCHE APPLE He ou II+ 1 
ou 2 drives + moniteur et autres 
peripherqiues Patrick ALDE- 
BERT Tel: 65 95 34 {region HE- 
RAULT). 



Vous employez du personnel 
par teletraitemenl ? Je cherche 
une entreprisp qui pourrait 
m 'employer de cette tarpon . 
Equipement de base Apple lie. 
Pierre VACHLER Tel: (56) 63 35 
49 (33210 LANGON). 



VENDS APPLE lie + moniteur 
+ 2 Floppy disk (garanti jus- 
qu'en Avril 85) Prix inleressant. 
Ingrid SCHUMACHER 5CHIE- 
FERSTOLLEN 10 4785 RECHT 
Belgique. 

(N.D.LJ.C: Heureusement que 
tautes les petites annonces 
n'ont pas des actresses aussi 
compliquees, c'est d6ja long a 
taper, alors la j'vous dis pas!. . .) 



ATARI 



VENDS ATARI 800 XL + ma- 
gneto + decodeur Peritel + 
joystick + livre (valeur 4750 F.) 
Vendu 3500 F. Monsieur ZA- 
NETTA Tel: 606 45 14 ou 848 
37 46 (apres 20 H). 



RECHERCHE pour ATARI 800 
XL lecteur de diquettes. Bon 
etat entre 1000 et 1500 F. Tel: 
249 02 37 (apres 19 H). 

VENDS ATARI VCS 2600 + 2 
sorties de manettes + 8 casset- 
tes de jeu + tranfo: 1200 F. Tel: 
249 02 37 VENDS ATARI 600 
XL + magneto + cartouche De- 
cathlon + 2 livres : 1900 F. Lau- 
rent REMONDI 13/6 rue Oswald 
Crepi 59130 LAMBERSART tel: 
(20) 51 20 37. 

VENDS ATARI 800 XL + ma- 
gneto K7 + 2 maneties + 3 ma- 
nuels + jeu + peritel sous ga- 
rantie. 2400 F Eric THIRION 54 
hid du General Gtraud 94100 ST 
MAUR Tel 885 66 82 (apres 20 
H) 

VENDS ATARI 600 XL + ma- 
gneto * cordon moniteur + au- 
toformation 2 + K7 Forbidden 
forest * livres e! jeux: 2000 F. 
Monsieur LAROCHE Tel 645 31 
58 (apres 17 H 30). 

VENDS VCS ATARI + adapta- 
teur secteur - 2 paddles *■ 2 
joysticks + 7 casseltes (Com- 
bat. Circus atari. Jungle Hunt, 
Space invaders. Pac man. Brea- 
kout. Donkey kong) Le lout en 
bon etat 2000 F Joel BERG- 
DOLL 40 avenue du Mai Leclerc 
08000 CHARLEVILLE MEZIE- 
RES 



VENDS CASIO PB 700 sous 
garantie 10 mois + manuel + 
housse 1200 F Demander 
BRUNO au 337 86 31 

VENDS CASIO FP 200 + 3 
RAM KO 4 imprimanle traceur 
de courbes 4 couleurs + cordon 
secteur + cordon magneto + 
documentation 4000 F Chris- 
tian GAGNOL Tel 500 11 63 (le 
soir) 

VENDS Casio PB 100 + ma- 
nuel duplications (valeur 8700 
F.) Vendu 500 F. Annie RASSE- 
NEUR 16/20 rue des fiacres 
59650 VILLENEUVE DASCQ 
Tel: (20) 04 66 44 (apres 20 H) 



COMMODORE 

VENDS pour Commodore 64: 
Flight simulator II (disk), manuel 
francaiS: 450 F + Pinball cons- 
truction (disk). 250 F. + Solo 
flight (disk): 200 F. 4 Caverns 
of khafka (disk): 120 F. + Busi- 
calc 1 (disk): 120 F. + Kickman 
(cartouche): 100 F. + Pole posi- 
tion (cartouche): 170 F. Michel 
LA ROCCA 30 bis rue de Nancy 
94170 LE PERREUX Tel: 324 
30 14. 

VENDS CBM 64 + magneto + 
imprimante * moniteur NB + 
son: 5500 F. En cadeau TOLL 
64 4 Eureka (valeur 8500 F ) 
Michel SEGARD Tel: 477 47 80 
poste 32 ou (37) 64 51 19 
(apres 18 H). 

ORIC ATMOS 

VENDS Oric 1 64K 4 magneto 
K7 RA 310 + joystick spectravi- 
rieo + 33 K7 jeux + 2 K7 as- 
sembler + manuels: 1500 F. 
Demander Jacques au 222 04 
45. 

VENDS ORIC 1 48K Ram + 
manuel + prise UHF N8 4 in- 
terface joystick + un joystick 4 
27 programmes K7; 1800 F. F. 
UGARTEVIDEA Tel: 340 79 89 
(de 18 H a21H). 
VENDS ORIC 1 48K + peritel + 
modulateur N/B integre + ma- 
gneto + livres sur oric et mocro- 
priceeeour 6502 * revuae el do- 
cuments + nombreux logiciels 
+ manettes. (valeur 5807 F. Le 
tout) Vendu 3000 F. Monsieur 
TRINQUIER 27 rue d'Oran 
13004 MARSEILLE. 

VENDS ORIC ATMOS 48K -t- 
cable peritel + mod N/B UHF + 
5 livres + 70 programmes + 
cordons: 2000 F. Monsieur 
MOUSSAC 90 domaine de Vil- 
liers 91210 DRAVEIL Tel: 940 
67 07 (le soir). 

VENDS ORIC 1 48K + peritel + 
cordon magneto + almentation 
+ livres + revues + K7: 1500 
F. Lino RIGON Le Lienz 65120 
BAREGES. Tel: (62) 92 67 17. 

VENDS Atmos + Peritel et ali- 
mentation + magneto + K7jeux 
+ livres + listing + manuel fran- 
cais: 2900 F. Patrick FAUCOU 
Tel: (95) 21 09 37. 

VENDS Atmos + peritel + ma- 
gneto spacial + K7 + tout cor- 
don + livres + revues : 2400 F. 
Joseph JAUZE 3 rue J. Bouin 
77130 MONTEHEAU Tel: 432 
86 15. 

VENDS ORIC 1 48 Ko + alim. 
+ Peritel + imprimanle + livres 
+ 10 K7|eux + magneto 3000 
F. Monsieur MOAL 17 bis ave- 
nue Patton 49000 ANGERS Tel. 
(41) 73 26 13. 

VENDS ORIC Atmos 48K + pe- 
ritel + alimentation + modula- 
teur NB + interface + poignee 
de jeux + 3 livres Oric ■+■ 6 K7 
jeux + 1 cassette Demo + ma- 
gneto Le tout 2500 F Jacques 
HELITTE 2 Impasse du Lavoir 
92420 VAUCRESSON Tel: 741 
83 66. 

VENDS ORIC 1 + tout cordon 
+ 2 livres + 20 |eux : 1500 F 
(ou 3 fois 500 F.) Modulateur 
CGV PHS 60 pour TV sans Pe- 
ritel: 350 F. J.P. LEROY 2 rue L 
Aragon 95340 BERNE OtSE 
Tel: 034 66 57 

VENDS ORIC 1 - Peritel + ali- 
mentation + 4 livres + pro- 
gramme + 1 cordon magneto 
1200 F J.M LANDRY 17 rue 
Claudius Collonges 69002 
LYON Tel (7) 837 50 36. 
CHERCHE contacls pour 
echange programmes Roland 
MASSART 290 rue de Juprelle 
4430 ANS ALLEUR Belgique. 



VENDS ORIC 1 48K + magneto 
K7 + 32 K7 jeux + 2 K7 as- 
sembler + manuels * interface 
N/B et joystick t nombreux 
trues 1600 F demander Jac- 
ques au 222 04 45 



SPECTRUM 

VENDS ZX Spectrum 48 Ko Pal 
+ interface Peritel, ZX1, ZX2 + 
microdrives + cables + mallette 
+ manette de jeux + 60 pro- 
grammes + livres + cassettes 
Environ 5500 F Bernard 
SAULNE Tel: 204 09 67. (apres 
19 H). 

VENDS Spectrum 48K + RS 
232 + microdhve + 10 jeux el 
divers livres: 2000 F. Monsieur 
MICHEZtel:827 58 51. 

VENDS Spectrum 48K Peritel + 
interface manettes jeux + 12 K7 
jeux + 4 livres : 2200 F. possibi- 
lity vente separee. Thierry GRE- 
GOIRE 5 rue des Cedres 33170 
GRADIGNAN Tel: (56) 83 61 
00. 

VENDS Spectrum 48K Pal + 
manuel + modulateur NB 
Secam + manette de jeu avec 
interface + 3 K7 de program- 
mes t programmes. Le tout 
2000 F. Philippe GAULON tel: 
798 93 21 . 

VENDS Spectrum Peritel 48K 
(16 + 32) + TV Couleur 36 cm 
Peritel + Ampll son + K7 Edt- 
teur / Assembleur 4 nombreux 
jeux et utilitaires sur K7 4 livres: 
3800 F. Daniel GOURDET Tel: 
(31 050 33 77. 

VENDS Spectrum Peritel 16K 
sous garantie 4 livres: 1600 F 
VENDS ou Echange pour 
ATARI 600/800 XL nombreux 
programmes jeux et utilitaires 
Yannick TREHIN 72 rue Wagner 
93150 LE BLAN MESNIL 
Tel 867 94 76 

VENDS SPECTRUM 48K Pal 
Secam 4 peritel sous garantie 
4 nombreux inedits anglais 4 
manuel: 2000 F. Olivier GERS 
13 rue d'Houin 94430 CHENNE- 
VIERES. Tel: 594 60 56 

VENDS Spectrum 48K + alim 
4 cables K7 et antenne Version 
Pal 4 adaptateur noir et blanc 
+ adaptateur couleur Peritel v 
magneto 4 alim du magneto * 
poignee de jeu + 8 livres de 
programmation 4 20 revues + 
200 programmes sur papier ■*■ 5 
K7 de 60 programmes de jeu + 
fiche elaboration programme. 
2100 F. Le tout Patrick GRAS 
Tel: 528 81 99 (apres 18H). 

VENDS ZX Spectrum 48K * 
alimentation 4 peritel 4 2 logi- 
ciels + 2 livres.: 1700 F. Pascal 
PRISSETTE 511 avenue Ken- 
nedy Six fours Bat A Les mouh- 
nieres 83140 SIX FOURS Tel: 
(94) 25 91 04 

VENDS ZX Spectrum + Peritel 
4 modulateur UHF +■ K7 + 
livres: 2000 F. C. DE NOAILLAT 
21 rue Letelfier 75015 PARIS. 
CHERCHE interface I Sinclair 
Prix raisonnable. VENDS Peritel 
integre pour spectrum Issue 2: 
100 F. Tel: (3) 979 05 06 
(POISSY) 



THOMSON 

VENDS TO 7 4 basic 4 ma- 
gneto + transfo 4 ext. Maneties 
et son + manettes: 3700 F. 
Trap: 250 F. , Survivor: 250 F., 
Allemand 1 : 100 F. Palrick 
CONSTANTINI Tel: (6) 909 29 
43. 

VENDS TO 7 4 extension Me- 
moire 16K 4 documents 4 pro- 
grammes: 2000 F. J. VILLAT 10 
rue S. Weill 75013 PARIS. Tel: 
(94) 87 94 55. 

VENDS ensemble TO 7 sous 
garantie + unite centrale + 
memo 7 Basic + extension 16 
Ko + lecteur K7 4 extension 
jeux et son avec 2 manettes 4 
logiciel Pictor, Anglais 2 volu- 
mes (4 K7) 4 initiation basic 4 
volumes (8 cassettes) + jeux la- 
byrinthe survie et PV 2000 + 
nombreux autres jeux. Le tout 
5000 F. A. ROSSETTO NORT- 
KERQUE 62370 AUDRUICQ 
Tel: (21)85 74 28. 
VENDS TO7.70 sous garantie i 
cartouche basic 4 magneto + 2 
volumes initiation Basic + livres 
programmes 4 manuel. 3700 F 
Stephane LEROY 133 rue Orde- 
ner 75018 PARIS Tel: 257 74 
32 (apres 17 H) 



VENDS THOMSON TO 7 Unite 
centrale * lecteur enregistreur 
de programmes +■ cartouche 
Basic microsoft 4 hvre initiation 
au basic TO 7 4 nombreux pro- 
grammes + nombreuses docu- 
mentations: 2000 F. 4 trap: 200 
F. 4 Pictor: 400 F (valeur 3800 
F ) Vendu 2500 F Fabrice 
PAGE 5 sente de la Brenne 
78310 MAUREPAS Tel: (3) 051 
53 58. 

VENDS TO 7 + modulateur 4 
magneto 4 ext 16K 4 memo 
basic 4 joysticks 4 manuel de 
reference et divers bouquins 
d initiation et de programmes * 
K7 de programmes (valeur glo- 
bale 6000 F ) Vendu 3000 F. J 
PAYA 15 rue de lArbre Pin 
21300 CHENOVE Tel: (80) 30 
81 75 (la journee) ou (80) 52 59 
27 (le soir) 

VENDS pour T07 T0770 cartou- 
che Pictor: 250 F. J Eric JARIL- 
LOT Ormes 71290 CUISERY 
Tel: (85) 40 25 23. 

TRS 80 ' 

VENDS configuration TRS 80 
Dernier modele III 4 48K K7 + 
imprimante DMP 1 00 + ma- 
gneto, lot K7 origramme Tandy 
+ livres et divers prggrammes. 
Le tout 8000 F. D. BOSSON- 
NAY tel: (3) 093 37 70. 
VENDS TRS 80 modele 1 Ni- 
veau 2 16K 4 magneto moni- 
teur: 2000 F. Monsieur BEAU 
Tel: 528 81 10 (apres 19 H). 

TEXAS 

VENDS Tl 99/4A 4 ext basic 4 
32 Ko RAM 4 magneto + cable 
K7 * joysticks Le tout 3200 F 
4 9 jeux. 600 F Ivan DUTKA 
Tel 547 93 83. 

VENDS pour Tl 99/4A module 
mni memoire 4 livre "initiation 
au langage assembleur": 750 F. 
Monsieur TONNELET Tel: (23) 
63 07 97. 

VENDS tl 99/4A + manettes + 
jeu 4 cordon K7: 1600 F. Chris- 
tian DEZERT 1 Place Grangier 
21000 DIJON 

VENDS Tl 99/4A t manettes de 
jeu 4 cordons: 1100 F. 4 livres 
programmation. VENDS egale- 
ment adaptateur Secam 350 
F.4 modules jeux, fichiers, 
livres. Olivier CADAERT 8 ave- 
nue des Tilleuls 78320 LE MES- 
NIL ST DENIS Tel: 461 81 60. 

VENDS pour Tl 99/4A K7 "basic 
6tendu par soi meme" "Aide a la 
programmation I" "Jeux retro II" 
4- livrets: 70 F. piece. RECHER- 
CHE module Echecs: 200 F. 
Jean Felix LE MASLE Tel: (97) 
60 22 23 (heres repas) 56500 
LOCMINE. 

VENDS Tl 99/4A 4 livres "boite 
a outils pour Tl 99/4A 4 Exerci- 
ces pour Tl 99/4A + la decou- 
verte du Tl 99/4A + jeux trues 
et comptes pour TI99/4A + Tl 
99 a la conquete des jeux + 
102 programmes pour Tl 99/4A 
+ module number magic + mo- 
dule Football + K7 jeux retro I 
' II + K7 basic par soi-meme 
cable magneto et magneto 
ic compte tours 4 une di- 
zaine de jeux sur K7: 2200 F. 
Emilian TUHTUREAU Lotisse- 
ment le bois 49170 ST MARTIN 
DU FOUILLOUX Tel: (41) 39 35 
87 (apres 17 H). 

VENDS Tl 99/4A 4 interface 
UHF Secam couleur + cable 
magneto 4 alimentation 4 Paire 
de manettes de jeu 4 aide a la 
programmation 1 et 2: 800 F. Le 
loul Programmation pour Tl 
Tome II: 100 F. 4 Initiation a 
'assembleur: 100 F. 4 modules 
>asic etendu avec manuel fran- 
cs et anglais. 700 F. 4 module 
Pole position- 300 F 4 module 
moonsweeper 200 F Monsieur 
CHRISTIAN Tel: 354 31 76. 



ZX 81 

VENDS pour ZX 81 plan de 
montage du clavier mecanique 
10 F (a la porlee de tout ama 
leur et realisation Prix interes ■ 
sant). Pierre LAYOUS 51 rue de 
a Pmede 13011 MARSEILLE 
Tel (91) 35 03 11 

VENDS pour ZX 81 Interface 
manette de jeux 100 F. 4 ma- 
nette de ieux: 60 F * Extension 
32K 400 F 4 nombreux lo- 
giciels Monsieur BELLESSORT 
Syfvam 15 rue Robert de Flers 
75015 PARIS 



VENDS ZX 81 16 Ko 4 calvier 
ABS * accessoires i livres et 
programmes + 16 logiciels 
1710 F. - magneto: 1960 AKIM 
HASSANI Tel: 885 49 36 

VENDS clavier alphanumerique 
Mattel adaptable console Mattel 
Permet de creer ses jeux ou ses 
programmes (valeur 1590 F) 
Vendu 800 F. ou echange 
centre ZX 81 16K Thierry LIE- 
VIN 17 rue St Vincent 10370 Vil- 
lenauxe la Grande Tel: (25) 21 
31 36 (apres 19H ou le week 
end toute la journee). 

VENDS ZX 81 4 16K 4 manuel 
+ 9 K7 de jeux 4 2 Ordi 5 + 
livres Le tout 800 F. Ludovic 
THIRION 9 rue Leonce Boulia- 
guet 95130 FRANCONVILLE tel 
415 41 29. 

VENDS ZX 81 4 64K + HRG + 
clavier memo 4 carte couleur 4 
manette + monitor AGB 4 carte 
mere + PI (Turnall) 4 carte 
graphique DK + K7 + doc 3300 
F Stanislas MALISZKIEWICZ 
La Gripperie 17620 ST 
AGNANT. 

VENDS carte 16K memopack: 
200 F. 1- carte 16 entrees et 16 
sorties: 500 F. 4 inversion 
video: 30 F. 4 program meur 
d'Eprom: 250 F. + carte reali- 
sant RANDUSR 8192 NIL": 400 
F. 4 Schematique du ZX 81 ; 
90 F. le livre. Monsieur NOU- 
GUIER 215 Bid de la madeleine 
06000 NICE. 

VENDS ZX 81 4 16K 4 K7 (co- 
balt) + 4 livres + TV NB le tout 
1100 F Demander KAMEL Tel: 
410 29 57. 

CHERCHE pour ZX 81 exten- 
sion 16K ou 32K Stephane LE- 
ROUVILLOIS Tel: (91) 89 74 29 
(apres 18 H) 

VENDS ZX 81 sous garantie + 
cable magneto 4 manuel ins- 
truction 4 livre 35 jeux * ali- 
mentation 4 clavier ABS. le tout 
500 F VENDS 21 K7 Atari: 
2200 F. a debattre. Tel: (27) 46 
70 27. 

VENDS ZX 81 4 16 Ko + ma- 
nuel ufilisation + livre de 70 pro- 
grammes: 700 F. Guillaume DE- 
VINCK 77 avenue du General 
Leclerc 38200 VIENNE Tel: (74) 
53 43 87 (apres 1B H). 

VENDS ZX 81 4- extension 16 
Ko 4 clavier ABS 4 2 K7 jeux 
+ 2 revues. Le tout 900 F. Tel: 
(93) 46 20 83. 

VENDS ZX 81 + clavier profes- 
sionnel Dr' Tronic + 3 livres pro- 
grammation + K7 Echecs: 1000 
F. Monseur PAYAU Tel: (61) 89 
19 53 (heures bureau) ou (61) 
95 06 52 (heures repas). 

VENDS ZX 81 4- clavier ABS 4 
RAM de 48 Ko + imprimante + 
4 livres 4 3 K7 4 revues Ordi 5. 
Le tout en bon etat (valeur 4 
3000 F.) Vendu 1700 F. Michel 
STECK Tel; 029 66 64 (77680 
ROISSYENBRIE). 

VENDS ZX 81 + 16 Ko 4- ma- 
nuel + livre "70 programmes 
pour ZX 81" 4 "32 fiches basic 
universel" + 40 programmes 1 
Ko + 1 grand programme 16 Ko 
+ TIFI n° 2. Le tout 1000 F. J. 
RIGUIDEL 61 avenue Marcel 
Cachin 59282 DOUCHY. 

VENDS ZX 81 + memoire 64K: 
900 F. 4 TV N/B Orion: 1000 F. 
+ TV couleur Audtologic: 2000 
F Henri GRUCHOT 39 avenue 
de ('Europe appt 3 08170 
FUMAY. 

VENDS ZX 81 + carte haute re- 
solulion + cartouche de jeu: In- 
terceptor 4 K7 16K Daytons, 
Traffic, 3D Defender, Int cobalt. 
Scramble, 3D monster maze: 40 
Francs chaque. Stephane RAY- 
NAUD Tel: (68) 69 40 92 (le 
soir). 

DIVERS 

VENDS AQUARIUS + Exten- 
sion 16K 4 rallonge PERITEL 4 
livre programmes AQUARIUS 
Le toul 1350 F. Tel: (74) 59 24 
49. [apres 18 H). 

VENDS VG 5000 philips 4 2 lo- 
giciels Us Rallye et Football 4 
interface manettes 4 2 manet- 
ies + magneto special informati- 
que + livre "103 programmes 
pour VG 5000" (valeur 2950F.) 
Vendu 2700 F. Sabrien MOS- 
KALA 52 rue J. Jaures 62420 
BILLY MONTIGNY Tel (21) 20 
26 79. 



1 



sur simple appel au 
(59) 83.78.78 



VENDS NEW BRAIN 32K 4 
unite centrale : 2500 F. + ma- 
gneto: 300 F., moniteur: 700 F. 
Peut fonctionner avec n'importe 
quel magneto. Monsieur 
DUMEN 14 rue E. Fouquet 
40800 AIRE SUR L'ADOUR tel: 
(58) 76 74 97. 

VENDS CBS 4 adaptateur peri- 
tel 4 2 cassettes Zaxxon, Don- 
key kong: le lout 2000 F. Tel: 
(31)97 20 63 

VENDS moniteur Zenith data 
system noir et vert, etat neuf: 
700 F. (valeur 990 F.) Christo- 
phe LACHNITT tel: 242 92 42. 
(le soir) 

VENDS double floppy 320K 
pour DAI 4 20 disquettes 4 200 
programmes: 3500 F. Christian 
BERTHELOT 16 rue T. Lamy 
18000 BOURGES tel: (48) 50 
53 19 

VENDS LYNX 48Ko clavier 
QWERTY + 1 cassette de jeu 
4 1 magneto special avec cor- 
dons: 1500 F. (valeur 4300 F.) 
Monsieur REISER tel: 343 77 



CHERCHE ZX81 sans extension 
a bas pnx. Demander Philippe 
au (79) 62 78 71 (apres 19H). 
73000 CHAMBERY 

ECHENGE Videopac G7200 + 
K7 N" 51, n° 16. n" 27 contra te- 
levision peritel ou moniteur Peri- 
tel. Th>erry VIALLARD 100 rue 
constant coquelin 94400 VITRY 
SUR SEINE Tel: 680 23 06. 

VENDS imprimante SEIKOSHA 
GP100 4 interface pour Spec- 
trum: 2000 F, Philippe CLAUX 
747 rue Louis Barchoux margny 
les Compiegne 60200 COMPIE- 
GNE. 

VENDS m.cro OrdinateUf Aliee 
Matra hachette 4 extension me- 
moire: 1500 F + magneto 
Hermes 500 F. Emmanuel PI- 
CARD 21 rue de la croix de ro- 
mont 88390 DARNIEULLES Tel: 
(29) 34 22 97 

VENDS Videopac C52 Phlips 4 
6 cassettes: 800 F. (valeur 1600 
F.) J. Denis BEAUFILS tel: 797 
10 68. 

ACHETE module Hustle. Alpi- 
ner. Burgertime ou ECHANGE 
contre Munchman. Tl Invaders 
ou Gestion de fichiers Achete 
Tl LOGO 2 Paul CORNEC 8 
rue des Ecoles 56270 PLOE- 
MEUR. Tel: (97) 82 34 97. 

Qui pourrait me dire comment 
mettre mon Tl 55-11 en mode 
programme ? Achete manuel 
d 'utilisation de cette machine. 
ECHANGE toul programme pour 
cette machine contre program- 
mes pour Apple, Atmos, ZX 81 
ou Spectrum. 

VENDS LYNX 48K 4 cordons 4 
manuel + K7 demo. 4 livre as- 
sembleur + K7 programmes: 
2500 F F RUNAVOT 65 rue de 
Mulhouse 02100 ST QUENTIN 
Tel (23) 62 08 92. 

VENDS OP 544 memes carac- 
teristiques que PB 100: 300 F. 
Laurent HARBOUN Tel. 845 74 
43. 

VENDS Laser 3000 compatible 
APPLE 4 lecteur disk 4 manel- 
tes de jeu sous garantie (valeur 
9800 F) Vendu 7500 F. Didier 
DJERMON 210 Bid de la Villette 
75019 PARIS. Tel: 208 51 31 

VENDS HP 34C (valeur 1090 
F.) Vendu 500 F 4 rechargeur 
de batteries ■< manuels 4 em- 
callage dongme Philippe LAM- 
BALI EU 7 rue de Lorraine 
59500 LAMBRES LES DOUAI. 
Tel (27) 87 39 24. 

VENDS ZX 80 modilie 81 (done 
idenlique a une fonction pres) 4 
16K -t- alimentation et cordons 
i- livres: 500 F J L. ARBERTUS 
Tel (6) 996 78 30. 

VENDS LYNX 48K i moniteur 
vert Zenilh 4 cordon 8 tons 4 
K7 recorder * livres et program- 
mes Pascal REBOURS Tel: 
255 44 09 (heures bureau). 
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DEMANDEZ LE PROGRAMME soft-parade 



Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 

Nous avons selectionne pour vous les meilleurs logiciels actuellement disponibles en France. Nous ne 

pretendonspasquecetteli$teestcompleteetdefinitiveetilestevidentquenousyrajouteronsregulie~ 

rement des programmes. Pourtant, vous chercherez en vain certains programmes qui jouissent d'une 

bonne reputation et quise vendent surtout grace a la publicite et aux conseils des vendeurs qui ne peu- 

vent pas connaitre tous les logiciels disponibles. 

Les prix sont, nous I'esperons, les meilleurs du marches et les abonnes - anciens ou nouveaux - benefi- 

cient en plus d'une remise de 10 %. Si vous etes nombreux a nous suivre dans cette experience nous 

pourronsrapidementarriverafairebafsserlestarifsdesfournisseurspouratteindrel'objectifquenous 

nous so/nmes fixe: ramener les prix a une plus juste valeur ! 

Les classements sont faits en fonction de I'interet du programme et ne tiennent pas compte des prix, 

c'est a vous dejuger de Vopportunite de la depense. N'oubliez quand meme pas que si le rapport quali- 

te/prix est mauvais, le logiciel ne peut figurer dans cette page ! 




SI vous etes ABONNE, 
dedulsez VOUS-MEMES 
vos 10 "Ads REMISE 
sur le boil de com maud e. 




. nouveau . 



SPACE SHUTTLE SIMULATOR 



LABYRINTHE SORVIE 



RADAR RAT RACE 



SCORPffiUS 

REVENGE OF THE MUTANTS CAMELS 




LOGICIELS 


Ordmaws 


Pn> 


■:,. 


Mor.ta-1 
















REDUCTION 10 ft SPEC 1*1 *BONh 

n"*bon«e (obiigaioire) ._!_ 
MONTANT a 


jayc . 


« 







COMMODORE 64 



ORIC 1 / ATMOS 




PUBLICITE 



2l 




H6 oui, de la publicite dans Hebdogiciel, nous rentrons dans le rang? Vous rigolez ou 
quoi? Les annonceurs que vous voyez la, id, dessous se sont engage's a faire 5 % de 
remise aux abonnes de I'hebdo sur TOUT le magasin, y compris sur les ordinateurs, les 
fournitures et les peripheriques. C'est pas de la bonne publicite, ga, Madame? 
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grand ehoix de logiciel: 

libraine speciahsee 

nos PRIX ..SERVICE COMPRIS: 






'«*,» 




. THOMSON-M05-T07.70 
. POINT CONSEIL TIFY 
. MSX - YAMAHA - SANYO 
. LIBRAIRIE 



sinczlsir 



o=« 



10000 TROYES 
Tel (25) 73.28.49 



/^IJO Prisant a I exposition _ inlor- 



matlque SIMA8E (bid de Bel- 
glque, TROVES) 



VIDEO 107 INFORMATIQUE 

♦ ♦ ♦ #■ o 



PLACE DES FETES 
75019 PARIS 



QL SINCLAIR DISPONIBLE 

COMMODORE, ORIC, AMSTRAD 

EXELVISION 



Tel.: 201.46.09 



ARVERNE 
INFORMATIQUE 



. ventre de micro-ordinateurs famiSiaux a 
partir de 580 Francs dont SINCLAIR, AMS- 
TRAD, THOMSON, APPLE... 

. OFFRE SPECIALE DE NOEL : 5 % de remi- 
se pour touts commande passee avant le 
31 Decern fore 84. 

ARVERNE INFORMATIQUE 

99 bis Avenue Max Dormoy 

63000 CLERMONT 

173)83 11.10 



VIDEO TROC 

VENTE - ECHANGE - DEPOT DE 

TOUT MATERIEL VIDEO ET MICRO- 

INFORMATIQUE - LOCATION DE JEUX 

[ NOS PRIX NEUFS f\ 

COMMODORE 64 1 2690 F LECTEVR DISQLETTE : 2890 F 

W0NITEUR COULEVR : 2490 F M0MTEVH ECRAN AMBUS : 950 F 

AMSTRAD MSX CANON V 20 : 2990 F 

+ MOMIhtlt MQ\OCHROME : 2990 F 

+ MOMTEVR COll.FVR :U90¥ 

l-lll'KI'l m?E BROTHER M.I009 : 1999 F 

OUVERT DU MARDl AU SAMED1 DE 10 H A 19 H 00 
LE LUND1 : DE 14 H A 19 H 

8$ /),,, rue de Cimtmtm 73612 PARIS 

lei .' i42.IS.54 

metro :«a'v <fe I i on. Lctini liotlin 



BIMP 



LA MICRO INFORMATIQUE A LYON 



20, me SERVIANT 69003 Lyon 
til. i (7) 860.84.27 



LE SPECIALISTS DES LOGICIELS 
APPLE ET THOMSON MO 5 & T07 



INFORMATIQUE 
2000 

le specialiste de la micro- 
informatique familial© 

Nombreuses marques disponibles, 
Logiciels, livres, conseils. 

LE TRIANGLE - Niveau bas 
(67) 92.92.17. 34000 Montpellier 



VISMO 

Vente informatique service micro ordinateurs 

ORIC, SINCLAIR, AMSTRAD 

Moniteurs couleur et N/B. 

Tous peripheriques 

ASSEMBLEUR MONAMS 
Recommande par Hebdogiciel 

84, bd Beaumarchais 75011 PARIS 

12, bd de Reuilly 75012 PARIS 

338.60.00 



ABONNES, 

si vous avez un probleme avec une de 

ces boutiques, vous savez a qui vous 

adresser? Je ne vous fais pas de des- 

sin? 



ANNONCEURS, 

vous avez envie de vous lancer dans 
I'aventure? Vous etes prets a consentir 
S % de remise sur toute voire boutique 
pour la voir envahie de programmeurs 
tous? Ecrivez-nous, nous vous ferons 
payer tres cher le centimetre carre de 
publicite! 



BLANC BERNARD 

Informatique Bureautique Lyon 

AMSTRAD - SINCLAIR - ORIC 

- SHARP - THOMSON - SANYO 

- LEANORD - LOGYSTEM 



9, run Salomon Remach 69007 LYON 
Tel. : (7) 872.25.48 (pre! foculles| 



Assistance technique. Logiciel. Formation 



HERCET 
MICR0-INF0RMATIQUE 



41, esplanade Flechambault 
(26) 82.57. 98 5J000 Reims 



ORIC - SINCLAIR - MEMOTECH 
MSX (sanyo, yeno, yamaha...) 

Librairie et nombreux logiciels. 



un SPECIALISTE, c'est PLUS SUR et. 
... c'est toujours MOINS CHER ! 

MICR®METZ 

' I 

micro-informatique pour tous 



ordinateurs personnels & professionnels 



compatibles 



57000 METZ 



Zenith - Toshiba 



& 



ft* 



la page pedagogique 



la page pedago 



Nos gentils bambins adorent les puzzles, profitons-en pour developper chez eux des notions liees aux differents mouvements interve- 

nant dans I'espace. . ,, __...__.__ 

M. GRANDPIERRE 



Mode demploi: 
II s'agit de reconstituer le 
dessin masque a droite de 
lecran. Pour ce faire, il laut 
deplacer la case clignolante 
de la grille de droite et Is 
faire coincider avec la case 
non clignolante Au niveau 1 
du programme, la case cli- 
gnolante est deplacee grace 
aux touche -* , *- f 8t A do 
clavier. Au niveau 2 la case 
clignotante reste fixe, les tou- 
ches f . I ,«-«-* n* ser- 
vant qu'a coder le chemin 
suivi. En cas d'erreurs, la 



touche CLEAR permet d effa- 
cer le dernier mouvement ef- 
fectue (uniquement au ni- 
veau 2j La frappe ENTER 
acheve 1'introduction d'un 
chemin quel que soil le ni- 
veau de jeu choisi. Si par le 
chemin suivi. la case cligno- 
tante coincide bten avec la 
case tixe (ce qui est evident 
au niveau 1 mais pas tou- 
jours au niveau 2) le dessin 
cache a droite de lecran se 
devoile peu a peu, sinon il 
reste masque En cas d'mlro- 
duction d'un chemin laux au 



niveu 2. I ordmateur monlre 
I'effet du chemin propose sur 
la case clignotante 
Si ces explications ne vous 
semblent pas Claires, testez 
d'abord le niveau 1, c'est ex- 
cessivement simple Ensuite, 
passez au niveau 2. faites 
des erreurs pour voir 
commenl lordinateur mdique 
I'effet du chemin propose, 
puis essayez de jouer correc- 
temeni en uttlisant la touche 
CLEAR 




TROUVDES sur TRS 80 









J RFM R 


TREIUVF L£ 


DESSIN 


B BE" TRS 


80 flODELE 


I DU III 


8 SEM 


B. GRANDP1 




;'L1 l.'IJM[-.1IM 






30 ELS 






40 CLEOR 


000 




50 DEFINT 


ft-* 






6 




70 DIM D* 




2).H'2i.At3> 


IBB fl£« P 




] IC ] PAL 


1 1 GOSUB 


1500 




138 GOSUB 






170 GDSUB 






liB GOSUB 


1700 




150 GOSUB 


IBM 




ISO GDSUB 


2000 




170 FDR I 


TO 9 




IBB GOSUB 


2500 




190 IF NI 


1 THEM GOSUB 7080: 


DOSUE 


7500 ELSE 


OOEUB u000:GD5UB 4500 


200 NEXT 






£1B FOB I 






220 GOTO 


SB 




1000 REP1 


MOM DE L" 


LEVE 



IB3B 
2MB 

2B50 
206B 
2B7B 



21 IB 

2120 
2130 
2140 
2150 






1010 C 

1020 EC=196iNM"" 

1030 PRINT364. "QUEL EST TON NOB -1 ! 

1B40 PRINT3EC,'"'"I!EC-EC*2 

1058 fl»-INKEV«!IF A»="" THEN 1050 

I860 IF 0SCCA»1=13 THEN CLBtRETURN 

1070 IF flSC<B«)"B THEN IF LEN(N»J>0 THEN N*=LEFT* 

iN*,LENlN*)-11 :PRINT3EC " "i:EC=EC-HGDTD IDE 
1060 IF A*>-,"A" AND fl•t= ,, Z , ■ THEN N*=N»+fi*:EC=EC*l : 

PRINTaEC.A«; 
1090 GOTO 1B5B 
1200 HEM NivEOU DU JEU 
1210 CLS 
220 PAINTTAB(2B1"* RETRDUVE LE DESSIN *" 



PRINT327. -TOUR 

PR I NT 396- LENIN 

FOR I°1T0 1> 

FDR J=0 TO 3 

PRINTB266*W*6<L»I.B«t: 

PIUNT8292+4*J+***I. '#•»#-! 

NEXT J.I 

FDfl 1-13 TO 52 

SETCI. LDtflETCI, 27)iBeTCI+5; 

NEXT 

FOB 1=11 TO 27 

SET (19. I):SET(52.I):SET(71,i 

NEXT 

RETURN 

HEM CA5E5 A LIER 

FOR J=0 TO N 

IF P(J)=2*I THEN C<1>=J 

IF P(JJ-3*I+1 THEN C(2>=J 



2550 FOR J»l TO 2 

2560 D' JI=lNTiC J>/4):B'J>- 

2S70 PR]NTa?6£-+4*-m J>*£4»0- 

2380 NEXT J 

2600 P«INT870i.STB!NG»'6C. ' 

26 IB RETURN 

30*10 REM REPONSE NIVEAU P 



!, m>8ET(I+92i 27) 



'«INTa2&E-»44 n-.eJ.-0- E 
ra2E6+4,>i"2>+E.4*Q(2> 



1230 F 
124B F 



-TAB(5) "NIVEAU 1 



I PRINTTAB(S)" 
"""""M#l) I 



i DEPLHCEMEUT D'UNE COSE' -"■' 



■CHR»l92)l 



i chemin code par 



3030 A=A5C'A») 

3040 IF 0=13 THEN RETURN 

3050 IF 0-8 THEM BX=- 1 :OV=0:GOTO 3100 

3060 IF A=9 then DX=;;DY=B;GOTD 71B0 

3070 IF A=10 THEN DX-0: DV=1 :GDTO 3100 

30S0 IF 0=91 THEN DX-0:DV=-1 :GOTO "IWP 

3090 D*=0:Dv=S 

310B IF R*DX(8 OR R>DX>3 DR O+DVI0 OR P-DV>4 

TUB PRIMT32S6. (,•0-64*0. B»: 

7120 R-R*DX:(MJ*Dv 

3130 GOTO 3010 

RTP0NS6 NIVEPU 1 



1260 PRINTJPRINT 

1270 PRINT"NIVERU CHOISI ?" 

12BB AS*-INKEV*=IF fl»("l" OR A< 

129B NI-VALIA*) 

13BB RETURN 

1500 REM LECTURE DES DE5SIN5 

1505 CLS 

1S10 FOR 1-1 TO 

1520 FOR J-l TO BB 

1530 HERD 

15*0 D*(I>=D» 

1530 NEXT J.I 

13C0 RETURN 

17W 'CHOIX DU DESSIN 

1710 ND-RND(O) 

1720 RETURN 

ISCfl RETT PEHMUTOTION HLfiftTOIRE 

1310 FOR I-B TO N 

1820 P(I>-I 

1830 NEXT 

1S40 FOR 1-0 TO N-l 

1B50 M-I-1+RND<N+1-I> 



M 2" THEN 1280 



3320 FQR J-l TO 2 

"530 PHINT3292-'4--RIJl4.Ej 1 .o, J). nID*(D»(NDi. 16*Ql J1»4*R( Jl« 

3340 NEXT J 

3550 PRINT3266*4*R*64*0, B«; 

3560 PRINTa266-4*R'2>*E4*OC2».B*; 

337B RETURN 

4BBB REM REPONSE NIVERU 2 

4B10 FOR 1=0 TO 3Jn(J)=0:NEXT 

4020 EC-7B4:K«32;Kl"32in-R<I) JQiQ(l) 

4030 R*-INKEY<:IF Q*="" THEN PRINT325e+4«-H+B4*Q. STRING'S (4 



>+CHR*(D> 



INT3EC. CHR»1K1! 
• R^+c^O^)," 
HUa fr=OSCifitj 

40S» IF fi-U THEN PRINTaEC." " t IflETUfl 
406B IF R-8 THEN M-HGOTO A12B 
4D7B IF 0'9 THEN n>0!GOTO 4120 
4068 IF ft-lB THEN H-2I00T0 4128 
4090 IF ft-91 THEN M-31GOT0 4120 

: then if EC) 7B4 PRiNTaec. 






:-.P(tINT3266* 



illl GOTD I 
1120 f 



>EC-] 



iM-9*-PEEK(l5339*6C>i 



2880 REM RFFICHRGE 

2010 B«-CHR*fie3)*CHR»<179>+CHR*ll79)+CHR*aE7) 

2820 CLS 



4130 IF R(l>*Oi01-O(lKB OR R(l )*O(0)-B< 1)) 3 OR 0( 3 >*0(2)-fi(3KI 

OR QU)*fl(2>-R(3>>4 THEN n*M)-R(M>-l:GOTO 4030 
4140 PRINTBEC.CHR*f94-t1>5:EC-EC-*l 
41 SB GOTD 4B3B 
45B0 REM TEST REPONSE 

4510 IF 0(2)-Q(l>Oft(2)- : a(3) OR R<2>-R(l> OB<fl>-R(l) THEN 43E8 
4320 FDR J-l TO 2 
4538 PftINTa292+4*R<J>*64*orj).MID«rD*<ND>.lE*Q<J>+4*R(J)41.A>l 



4540 NEXT J 

4330 GOTO 4718 

4560 FOR J=784 TO 764 

457B (l=PEEK(13368*J)iIF M-3J THEN 4710 

4568 ON M-9B GOTO 4598. 4680. 4610. 4628 

4398 DX-0"DV— UGOTO 4630 

4608 DX=B!OV=liGOTO 4630 

4618 DX=-l;D¥-0:GOTO 4638 

4620 DX=l:DV=8 

4630 R=R+DX:Q=0*DV:Ml=PEEKa5628+4*R+S4*Q> 

4640 FOR Jl = l TO 20 

4658 PRINTaj.CHH»(M)::PRINTa25S*4»'R-64*D. CHR»(M1 : :PRINT3266+4*R( 

1)*E4*0<U." "! 

4660 FOR J2-1 TO 20JNEXT J^ 

4678 PRINT3J. " ■; :PRlNTa26S*4iR«-64«Q. CHR*<M1 I : : PRINTS26S*-4*R' 1 > + 

64*Q<l),STRING*l4. lgili 

4688 NEXT Jl 

4698 PRINT3J.CHR*<MM 

4780 NEXT J 

4710 FOR J=l T(j 2 

4720 PRINT3266*4»Ri J)+64*0l J).B»5 

4738 NEXT J 

474B RETURN 

10000 REM FLEPHRNT 

18B20 DRTQ 31-. V.-.2. 32. 32, 16B. 176. 176. 32, 32.32.32.32.32.32.32 

1-0030 ORTH 32.32.32. 160. 19L. 191. 191.159.32.32.32.32.32.32.32.32 

18840 DATA 32. "2. 184. 135.32. 170. 191.191.191.191.191.191.157. 144. 

10850 DATA 32.32.130.129.32.170.191.151.131,131.171.191.149.32.3 
2.32 

18855 DRTH 32. 32. 32, 32. 32. 32, 32. 32- 32. 32. 32. 32. 32, 32. 32,32 
1BB6B REM P0IS50N 

1BB7B DflTfl 32. 32, 32, 32. 32. 32. 32, 32. 32. 32-32. 32- 32.32.32.32 
10080 DATA 32,32.32,32, 152. 131. 131. i31. 137. 144.32.152, 149,32.32. 

L0B90 DATA 32, 32, 32.1EE. 32,130. 32, 32, 32. 162. 166.32. 149.32,32.32 
10100 DATR 32.32.32.32.137.176.176.176.152.129,32,137,149,32.32. 

10118 DATR 32,32,32.32.32,32.32,32.32.32.32.32.32.32.32.32 

10120 REM CHRMERU 

10130 DfiTA 32.32.32. 188. IBB. 1 B9, 32. 32. 32. 32. 32. 32. 32. 32. 32. 32 

10140 fiBfa 32.22.32.32, 32. 191.160. IBS. 144, 1B4. IBB, 3i, 32. 32, I?. 32' 

10150 OQTfl 72. 32, 32. 32. 32. 191, 191. 191, 1B9. 191.191. 191,180.32,32. 

32 

18160 DATA 32.32,32,32.32.191.131.131.131.131.131.171,149.137.32 

.12 

IB17B DfiTD 32.72, 32. 32.32, 143,32.32. 32. 32, 32, 133, 133, 32.32.32 

10180 REM CHIEV 

10190 DOTH 32.32. 32. 32, 32, ISO. 144. 32, 32. 72. 32. 32. 32. 32. 72-32 

10200 DATB 32.32.^2. 170. 191 . 191 . 149. 32, 7.', IV? 32, 32, iS4. 32,32.32 

1021 B DOTR 32,32. 32,72. 32, 170. 1B9. IBS. IBB. 1SS. IBS. 159,1.29.32.32. 

32 

10220 EJATR 32,32,32.32.32. 186, 135, 131. 131. 131.175, 144.32,32,32.3 

10270 DATR 32.32.32.32.130.129,32.32.32.32.32,131.32.32.32.32 

1B240 REM ESCAPGOT 

1 B25B DATR 72, 72, 72. 72. 32. 32. 32. 32. 32, 32. 32, 32. 3.-'. 32, 32, 32 

18268 DATR 32. 176, 72, 176, 72. 32, 32,32, ISO, 144.32, 32. 32,32, 32,32 

10270 DATA 32, 170. 1EE. 149, 32, 160, 184, 19B. 191 ■ 191. 189, IBB, 144. 32, 

32.32 

1B280 DATA 32.32. 143. 140, 142. 143. 143. 143. 143. 143. 14.3. 1*3, 14!, 141 

. 13!. 32 

102=10 DATA 32, 72. 32. 72, "2. 72, 32. 32. 32. 32. 72. 32,72. 72.32.32 

10300 REM BALEINE 

10310 DATA 32. 1E0. 32, 32. 160. 32. 72. 32.72. 72. 32,72. 32,32, 72.32 

10320 DATA 136, 139. 169, 1EE. 139, 137, 32, 72. 72.72'- 32, 32,32.72,32.32 

10330 DATA 32.176. 19B. 190. IBS. 1.8B, 176. 32. 32- 32- 32. 32, 32, 32. 32,32 

10340 DATA 32. 191. 1ES. 191. 191. 131, 191. 191.191. 1QS. 176. 176. 191,17 

10350 DATA 32.130,131.131.131,131,131.131,131.131.131.131.131,13 



ERRATUM sur COM. 64 

LETTRA 64 du n° 65 Page Pe- ase uosub?ji0 iFH*<> ,, - M flNDfij<>"* ,, THENe90 

dagogique 900 ifa*="-"Thenpukev+2i,0 ootoi60 

Dans Je programme de M. TRO- sie print "3" GOTO000 

fiNON la fin rips rlPiix li^tmn^ a 92@ OUSUB730 U=l 

MftVaMte kiJtodFEK "• INPUT-OWBPE DE LETTRES C3-7>".N IFtK30RN>?TICW38 

™ r. 1 a . pan , °Z la "? nS 910 IHPUT"»IOMBRE DE MOTS '.1-10V -M IFWCIflfil^lBTHBOW 

780. De plus, dans le deuxieme 5,5^ return 

programme il manquait les 950 ifrsc<l*(DK49THEN440 

lignes suivanles. 970 ifhsc tL*< 1 > »57RNDflsca*(i > X65then440 



Monsieur J Yves LE FRIEC 
nous propose les modifications 
suivanles pour son programme 
pedagogique MENHIR du n° 



m 



:» ILEAP£Ciee..£7![>IM R-<£3,5),ECS3,5>,E*l 
13),V(a5,5J 

fg M*=":rt*=' , uriT5:4Lf4D0DJi0S0LALHL43S0L 
LiFHPAMIMIREREL4gD!J" 




7a page pedagogique 



la page pedago 



APPLE 
CHANGE DE SEXE 

Lisa la doyenne, ceiie qui a 
apprisau* petils Apple a se 
servir des fenetres et des 
souns, change de nom et de 
sexe. Elle s'appellera desor- 
mais Macintosh XL et tous 
les logiciels de Macintosh se- 
ront compatibles avec ce 
nouveau modele De gentille 
grand-mere, elle passe au 
stade de mechant Mac 



APPLE CONTRE ATTAOUE 



Apres I'annonce des nou- 
veaux modeles d'Atari el de 
Commodore, lecran plal a 
cristaux liquides tant attendu 
arrive comme par miracle 
Vous oourrez done brancher 
voire Aople lie avec cette pe- 
tite merveille de technology 
pour la modique somme de 
7.000 francs 24 hgnes de 80 
colonnes, 1 92 points par 560, 
il mesure 14 centimetres de 
large, 29 centimetres de long 
et ne fait que 4 centimetres 
d'epaisseur Dommage que 
I'alimentation du lie soil il 



lourde et si encombranle et 
que pour ce nouvel ecran il 
faille encore une interlace 
volurmneuse de plus, il aurait 
pu etre vraimenl portable et 
lutter contre le Commodore 
128 LCD 




ESPACE QL 

Direco. I importaleur des ordi- 
naleurs Sinclair en France, a ou- 
verl un centre de demonstration 
el de documenlalion pour les 
possesseurs on les 'uturs ac- 
quereurs de OL Ouvert a tous 
cet "Espace QL" se situe au 22 
avenue Hocrie Adresse qui a vu 
nailre et mounr les Multitech 
MPFM et Jupiter Ace de la mai- 
son Vainc-Laurene. filiale de Di- 
reco Esperons que ce local 
n est pas maudit et que le OL 
durera plus longtemps que ces 
deux machmes Wait and See 
comme dtra't Lord Sinclair 



IMPRIMANTE ISOURIS: 

LES MARI AGES CONTRE NATURE 



Les imprimantes vont bientot 
tenir dans la mam. La tra- 
cante de Penman se decom- 
pose en deux boitiers f un de 
la taille de deux paquels de 
cigarettes, 1 autre de la moitie 
dune cartouche La Plotter- 
Maus dessine 50 millimetres 
a la seconde et dispose 
dune finesse de trad de 0,03 
mm en trois couleurs Ses 
deux grosses roues en 
caoutchouc lui permettent de 
se promener sur des feuilies 
de format A3 ou A4 Elle se 
connecte sur tous les micros 



ayant une sortie RS232 C 
Elle est commercialisee au 
prix de 400 S . 
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Formation a I'assembleur 



COURS D'ASSEMBLEUR 



Depuis plusieurs semames, 
vous profitez dun cours d'as- 
sembleur decompose en deux 
parties princtpales (Tune theo- 
rique, I'autre pratique). 

Cette semaine. le cours prati- 
que concerns une nouvelle 
fois !e 6502 de I'APPLE. Le 
prochain numero consacrera 
une pleine attention aux an- 
goisses majeures du 6809 du 
TO7etduTO7 70. 



N°55- 
N"56- 
N Q 57- 
N°58- 
N°59- 
N°60 
N°61 
N°62 
N°63 
N°64 
N°65 
N°66 
N°67 



>ZX 81 

* ZX 81 

. ORIC 1, ATMOS 

► APPLE 

► T07, T07 70 

» COMMODORE 64 

► ZXS1 

»ORIC 1. ATMOS 

* APPLE 

. TO 7. T07 70 

.COMMODORE 64 

.ZXB1 

» ORIC 1. ATMOS 




Je vous livre maintenant le 
schema equivalent a un XOR 
(ou exclusif). Le niveau de 
complexity atteint necessite- 
rait une demonstration mathe- 
matique (sans utilite reelle 
dans ce cours) pour arriver a 
I'egalite suivante: 

XOR: (a ' b) = ((a . B) + (a . 
b)) 

Nous la prendrons done tel 
quel, comme un theoreme. 
Voici le schema tire directe- 
ment de celte formule: 

V XOR simule par NANDs 




Tout comme avec le circuit si- 
mulant un OR, a partir de ce 
circuit il est aise de concevoir 
un nouveau montage perm- 
mettant d'engendrer une fonc- 
tion NXOR en ajoutant un 
NAND monle en inverseur a la 
sortie du circuit ci-dessus 

Vous vous rendez sans doute 
compte que ces circuits ne 
sent que les fondations per- 
mettant la construction de 
montages plus complexes. 
Avant de voir certains de ceux- 
ci, nous allons regarder brie- 
vement I'allure d'un circuit 
NAND a trois entrees. 
w NAND trois entrees 



D'une maniere generale tous 
les circuits a plusieurs varia- 
bles peuvent etre cables avec 
des operateurs logiques a 
deux entrees. Pour votre cul- 
ture je vous dirais que les sim- 
plifications des fonctions a N 
variables s'operent grace a 
des tables de simplification 
mises au point par le mathe- 
maticien Karnaugh. Une fois 
encore, ces connaissances ne 
vous interesseraient pas outre 
mesure, e'est la raison pour la- 
quelle je ne m'etendrais pas 
dessus. 

Nous allons maintenant nous 
interesser aux "BRIQUES IN- 
FORMATIQUES". Ces briques 
sont des circuits complexes 
bas6s sur les circuits logiques 
que nous venons d'etudier 
precedemment. Avant de nous 
attaquer au probleme de lad- 
ditionneur (qui. comme son 
nom i'indique permet d'execu- 
ter des additions) nous allons 
distinguer deux types de fonc- 
tions. Ces deux types font 
appel run a la logique combi- 
natoire et I'autre a la logique 
s6qu§fitielle. La difference 
fondamentale qui existeentre 
ces deux genres reside au ni- 
veau du nombre des parame- 
tres de la fonction. En effet, la 
logique sequentielle prend en 
compte le temps (contraire- 
ment a la logique combina- 
toire). Cette variable "TEMPS" 
permettra de coordonner Tac- 
tion d'un ensemble de circuits 
pour obtenir une logique chro- 
nologique de leur action. Les 
deux fonctions combinatoires 
par excellence sont les fon- 
ctions NOR et NAND. Voici la 
representation d*une brique 
combinatoire a deux variables 
et d'une brique sequentielle k 
trois variables (dont le temps): 
Y BRIQUE COMBINATOIRE 






BRIQUE SEQUENTIELLE 






Pourquoi demi-additionneur? 
Parce que ce circuit ne peut 
pas operer sur des nombres 
de plus d'un chiffre. En effet, 
nous ne disposons que de 
deux entrees alors qu'une troi- 
sieme sera it necessaire pour 
reinjecter la retenue dans le 
calcul pour operer sur des 
nombres a plusieurs chiffres 
L'additionneur compiet pos- 
sede, lui, ces trois entrees. En 
voici le schema global: 



y ADDITIONNEUR 




Le demi-additionneur fait appel 
a deux circuits logiques pour 
fonctionner: la somme S est 
obtenue par un XOR (S = a * 
b) alors que le reste est ob- 
tenu par un AND (R = a . b). 
Nous pouvons done represen- 
tor graphiquement le contenu 
de la brique symbolisant le 
demi-additionneur: 

« DEMI-ADDITIONNEUR 




L'additionneur opera d'une 
maniere identique, a la diffe- 
rence pres qu'il travaille sur 
trois variables au lieu de deux. 
Nous obtiendrons done pour 
generer somme et retenue les 
fonctions: 

Sn = Rn * An * Bn 
Rn+i = (An . Bn) ♦ 
(Rn . (An * Bn)) 

Nous pouvons done des a pre- 
sent representor graphique- 
ment un additionneur compiet 
effectuant le calcul d'une co- 
lonne: 

w ADDITIONNEUR 



L'additionneur est un exemple 
parfail d'un circuit base sur la 
logique combinatoire. Pour en 
comprendre le principe nous 
allons tout d'abord voir ce 
quest un demi-additionneur: 
T DEMI-ADDITIONNEUR 



Le symbole inclus dans la bri- 
que represente une somme 
anthmetique (a ne pas confon- 
dre avec le symbole "+ " qui 
represente la somme logique) 




Comme vous pouvez le voir 
d'apres le schema ci-dessus, 
t'addiiionneur est constitue de 
deux demi-additionneurs et 
d'un OR Pour realiser un ad- 
ditionneur capable de traiter 
des nombres a N chiffres, il 
suftit de combiner N addition- 
neurs. 




L'ASSEMBLEUR PRATIQUE 

Langage machine... sur apple 




Nous avons vu la derniere fois 
a quoi correspondait le regis- 
tre d'etat et nous avons expli- 
que la fonction du bit Z. Mais 
que ce bit se mette a un ou a 
zero nous fait une belle jambe 
si on ne peut pas en tirer pro- 
fit. C'est pour cela que je vais 
introduire deux nouvelles ins- 
tructions qui tiennent precise- 
ment compte de ce bit. 

BRANCHEZ-VOUS ! 

8EQ VRAI effectue touiours un 
branchement au programme 
VRAI si le bit Z est a zero. 
Sinon, le programme continue 
son deroulement normal BNE 
FAUX effectue comme vous 
pouvez le deviner aisement un 
branchement au programme 
FAUX si le bit Z est a 1. Voici 
un petit programme illustrant 
ce que je viens de vous de- 
crire ci-dessus. 

ORG $ 300 

LDA # $ 01 

BNE FAUX 

BRK 
FAUX RTS 

Ce programme est tres simple. 
Nous mettons dans le registre 
A la valeur 01 , le bit Z se posi- 
lionne done automatiquement 
a 1 el ('instruction. BNE effec- 
tue le branchement au pro- 
gramme FAUX. Linstruction 
ORG n'est pas une instruction 
du 6502. mais est specifique a 
lassembleur et lui indique que 
je desire commencer mon pro* 
gramme a ladresse $ 300 



Vous remarquerez que dans 
ce programme je n'utilise pas 
d'adresses comme dans les 
programmes precedents. La 
raison en est simple, ce pro- 
gramme est ecrit a laide dun 
assembleur qui calcule lui- 
meme les adresses et vous 
vous rendrez compte plus loin 
pourquoi cette aide est vrai- 
ment primordiale pour ecrire 
de vrais programmes. Voici le 
meme exemple ecrit directe- 
ment sans un assembleur: en- 
trez dans le moniteur et tapez 
300: A9 01 DO 01 00 60 < RE- 
TURN >. Apres avoir tape ceci 
suivit de 300L. vous devez voir 
ce listing: 

0300- A9 01 LDA # $ 01 

0302- DO 01 BNE $ 305 

0304- 00 BRK 

0305- 60 RTS 

Si vous comparez les deux lis- 
tings, vous remarquerez que le 
mot FAUX a ete remplace par 
ladresse $ 305. Vous 
comprendrez qu'il est plus fa- 
cile de lire un listing qui admet 
des etiquettes comme FAUX 
que des adresses. 
A ladresse S 303 se trouve le 
chiftre 01 Ce chiffre corres- 
pond au nombre d'octels que 
le programme doit sauter afin 
de se retrouver a la bonne 
adresse Par exemple, dans 
notre programme, le branche- 
ment devant s' effect uer a 
ladresse $ 305, le programme 
doit sauter 01 octet pour atter- 
rtr ou il faut. Lassembleur cal- 
cule automatiquement le nom- 
bre doctets a sauter alors 



qu'en ecriture directe il faut le 
calculer soi-meme. Dans nos 
prochatns listings je vous ecri- 
rai les programmes en assem- 
bleur et vous donnerai I'equi- 
valent en ecriture directe 
comme je lai fait au-dessus en 
attendant que vous ayez 
acquis un assembleur 
J'utilise moi-meme I'assem- 
bleur MERLIN (anciennement 
BIG MAC) qui repond a tous 
mes besoins, est raplde. tres 
simple d 'utilisation et admet 
des macros instructions, mais 
cela, j'y reviendrai plus tard. 
Lassembleur LISA est impres- 
sionant par sa rapidite mais 
est moins simple d'utilisation 
que MERLIN. L'assembleur 
EDASM d'Apple (sous 

PRODOS) aurait pu etre cor- 
rect si lacces au disque n'etait 
pas si frequent et s'il n'etait 
pas presque indispensable de 
posseder deux drives. A noter 
que LISA nest a ma connais- 
sance disponible qu'en DOS 
3 3 alors que MERLIN vient de 
sortir en version DOS 
3.3/PRODOS (Merlin PRO). 
En un mot, je deleste LISA et 
j'adore MERLIN. Voila. 

BRAIKCQUE ? 

Revenons a notre programme. 
Executez le programme 

(300G) et que se passe-t-il 7 
Rien. C'est normal puisque 
notre branchement s'effeciue 
correctement et que nous arri- 
vons a I'adresse S 305 qui 
contient un RTS (ReTour de 
Sous-programme). L'ordina- 
teur nous rend done la main 
apres avoir fait ce qu'on lui a 
demande de faire. Changez la 
valeur donnee au registre A en 
00 (301: 00) et executez- le 
programme. Que se passe-t-il 
cette fois-ci ? L'ordinateur fait 
bip et vous affiche des choses 
bizarres. Ne vous inquietez 
pas, il n'est pas plante, vous 
n'avez pas besoin d'aller le 
faire reparer, il a simplement 
execute I'instruction BRK 
(hexa 00) car le branchement 
a I'adresse $ 305 ne pouvait 
se faire. Cette instruction (con- 
traction de BREAK) signifie 
"interruption du programme en 
cours". Vous me direz "Mais 
pourquoi ne pas avoir mis un 
RTS au lieu dun BRK puisque 
le programme etait de toutes 
faijons fini". je vous repondrai 
alors "Ach bedide balin I Bais 
gomment aurions-nous bu dis- 
dinguer le fait gue te brange- 
ment se soil bien realise ou 
don !" Le charabia affiche a la 
suite dun BRK est bien utile: il 
s'agit en effet des valeurs des 
registres A, X, Y suivis d'au- 
tres renseignements. La valeur 
du registre A est effectivement 
egale a dans notre cas. II est 
aussi possible d'obtenir ces 
valeurs sans lintermediaire du 
BRK mais en tapant CTRL-E < 
RETURN >. Vous pouvez 
done verifier que tout se de- 
roule bien en mettant 01 dans 
A, en executant le programme 
et en tapant CTRL-E lorsqu il 
vous redonne la main 
JMP MOUTON 

Une instruction nouvelle: JMP. 
contraction de JUMP qui 
comme son nom I'indique exe- 
cute un saut a un programme, 



mais sans tentr compte de la 
valeur dun bit du registre 
d'etat. Ce saut s'appelle un 
branchement inconditionnel 
alors que les instructions que 
nous avons vu precedemment 
sont des branchements condi- 
tionnels. Le petit programme 
qui suit vous permettra de 
bien comprendre la difference 
entre ces branchements. 

DEBUT ORG $ 300 

LDA # $ 00 

STA S F0 

LDX # $ 00 

LDY # $ DO 

STX $ F1 

STY $ F2 

BNE NONEGAL 

JMP DEBUT 
NONEGAL RTS 

Equivalent en ecriture directe: 

300:A9 00 85 FO A2 00 A0 DO 
86 F1 84 F2 DO 03 4C 00 03 
60 < RETURN > 

Ce qui donne en memoire: 

30O-A9 00 LDA #$ 00 

302-85 F0 STA $ FO 

304-A2 FF LDX # $ 00 

306-AO DO LDY # $ DO 

308-86 F1 STXSF1 

30A-84 F2 STY $ F2 

30C-D0 03 BNE $311 

30E-4C00 03 JMP $300 

311-60 RTS 

Ce programme n'est pas 
complique, il remplit les regis- 
tres A, X et Y de valeurs, les 
stocke a certaines adresses, 
effectue un branchement a $ 
31 1 dans le cas ou le bit Z se- 
rait mis a 1, ou retourne a $ 
300 dans le cas contraire. Si 
vous faites tourner ce pro- 
gramme, vous remarquerez 
qu'il vous redonne la main, 
done qu'il passe en $ 311. La 
raison en est simple, le regis- 
tre Y contient la valeur $ DO 
qui est differente de zero, 
done le bit Z est mis a un et le 
branchement s'effectue. Par 
contre, si vous interverlissez 
STX et STY afin que STX se 
trouve juste avant le BNE et 
vous refassiez tourner le pro- 
gramme, vous remarquerez 
qu'il ne vous rend plus la main 
mais qu'il tourne sur lui-meme 
(JMP $ 300) et que la seule 
facon de I'arreter est d'ap- 
puyer sur RESET 

Voila. Jespere que vous avez 
bien compris le fonctionne- 
ment des instructions de bran- 
chement, exercez-vous a 
ecrire de petits programmes 
qui tiennent compte de toutes 
les instructions que nous 
avons vues mais soyez tout de 
meme en forme pour la pro- 
chaine fois. nevousruinez pas 
la sante... et allez done ache- 
ter Merlin ou Merlin Pro pour 
me faire plaisir. 
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LE CHATEAU 
DIABOLIQUE 



Osez penetrer dans ce chateau et vous aurez toutes 
fes chances de vous retrouver en enfer ! 

Dominique DAMEROSE 

Mode d'emploi; 

3 Ko d'extension seront necessaires pour faire (ourner ce jeu. Le 
premier programme contient la regie du jeu. le deuxieme conlient le 
|eu lui-meme. 



FOBG^ITOIB NEXT6.-J 




106 PRINT ' 

le? FPi»T"ipwa ■ $ 

163 PRINT' "" 
103 PRINT 



508 Xl=36365 F0BJ= 

1006 S2=36S74 V=36878 

1007 REM 
1009 PDKEV, 1 
1009 REfHDP 

1B10 IFP=-1THEN1017 

1011 REMW 

1012 P0KES2.P 

1013 FORN=1TOD NEXTM 
101-1 POKES2.0 



101? 

1018 POKES1.0 

1020 DATP.22S, 360, 225, 360- 225.340. 228. 120. 231 360, 231.249.228, 120, 

231,240,232.120 
1H21 HHTRS35. 726,240, 369,233,360.231,360,223,360,235,240,232, 129. 

231,249,228,120 
,225,480 
1922 DfiTR-1 

Pi 1 ::;" ■ WOULEZ-VflUS LB REGLE", INPUTC* 

1501 1FQ*="O"THEH2B00 

1502 IFQ*="N"THEN2003 

1503 IFQ*O"N"DRQ*O"O"THEMS00 

2oaa pRiHT-sn sles nacHRTeRusri mm skdi™l£SS" 
;:*■■:>:. PBIHT-MWL.C BUT DU jeu EST BE'' 

2002 PR1NT"S0RTIR VIVFINT DU !CHflTEF.U31 DU OTWBLESI CRR" 

.■::.:;: =■;-!>!: -.-cL "!■ ! i :i:'!l" ■ = .-=-.'■ r . . - ■ . .. ,..,!.'!■ V 
.^[j[)4 PRIIIT'TT lit i:.VflMPll=ESn. " 

2905 PRINT "MR IS ATTENTION VOUS ME POSSEEEZ rjU'UNE SEULE VIE" 

2006 PR1NT-IL V R flUSSI LES DEUX SRLLES MflOIQUES QUI VOUS 
EI1EIIENT «U " 

2007 PRINT"MILIEU DU KHRTERUS1" FORI=ITO20000 NEXT 
2808 PRINT "WRITES SHIFT HUN/STOP" 

2889 PRINT"1W DONNE CHANCE! Hi" 
2100 PRINT"!" NEM 

. P0KE36879.8 PRINT"!!!" 
08 REM 

"■ ":<;'jsK"j» G03uBie-s gi^-mb 11550 gi-jsubi '.);!=:■ r.o-=ijri!tu;<: rng^ii:; 




15! i:-K'JI:1Wij GMMJF-I850-GOSUB1860 

182 PRINT' 
INPUTU* GOSUB308B8 

183 IFU*="S"THEN160 

184 IFUf="E"THEN199 

190 REM 

191 GOSUB1970 



-•v if;l=='"E ,, then320 

358 IFZ*="S"THEN360 
369 N=INT(1+2*RND(8)) 

361 IFN01THEN363 

362 G0SUB1BBS OOSUB1035 GOSUB1069 GOSUB1035 
365 ':O1UB1000 G0SUB196e O0SUB1655 



COiUfJJ'J^t 



INPUTFI GOEUB3B000 
193 IFF*=-O"THEN180 
134 IFFI="E"THEN220 

196 lFF»s"N"TKi£ii;:r.O 

206 REM 

■•■:•: ■■■!■!■■!■■ .,■.:,<■■ , i. i . , . ,:'i'i . ■: -yyir:,-;-i 

202 PRINT"MMMMMMHMMMMMMMMMKN;E,S)" 

IHPUTO* GOSUB30009 
293 I Fail's "THEN 130 
284 IFO*="H"THEH220 
206 IFO*= ,, E , 'THEN230 
219 REM 
-'-. GC15UB1888 G0SUB1845 GOSUB1B55 GQSUB1S6B 



MHIiniinKN. S) " INPUT** GOSUB30000 



367 IFX**="N"THEN350 
369 IFX*="S ,, TMEN400 

FGOl THEN 130 

'o;;ej«v's, iz vv.L^i^m;.-..-, p.-,rF_:Lv::i76.L foph=itc 

03 POKE36876-0 FRINT";KQUS ETES S 



214 IFR*-"N"THEN239 

220 REM 

221 G0SUB1BS9 GQSUB1045*OSJBie5S C0SUB166S 

222 PRINT"* 



IHPUTP* i GOSUB3B93B 

223 IFP*-"S"TH£N2©0 

224 IFP*-"O"THEN190 

225 IFP#-"£"TNEN249 

230 REM 

231 R»1NTU*3*RN1K0>) 

232 IFROHHEN235 

233 GTJSUB1000 GOSUB1030 G0SUB1B45 GOSUB1SS5 GOTOlSt 
235 G0SUB1BBB G05UB186S G0SUB1B43 



05 IF0*-"N"THEN12 



GOSUB1909 GQSUB104S GOSUB1030 GOSUB1063 

print- waananwwwBB— «b— imiiiiwai o 

i GOSUB30B99 



.21 GOSUB1029 G0SUB1945 G0SUB1865 

— PRINT" ftOTroWIWBirormiHMpBBMlJMMMMI (S,D>" INPUTG* 
OOSUB30030 

12 iF':^= ,, s ,, THEtne0 

"G*="0"THENi6B 

31 E=INK1+3#HNB<0)) 

1_ i!-"f_01THEN135 

33 UOSUBISBB GOSUB1B35:GOEUB1045 GDBUB1B59 GUSUBISSS GOSUB1065 
GOTO 18080 

35 GGSUB1000 GOSUB1045 G0SUB1B58 GOSUB1B55 DOSUB1063 

36 PRINT"S 

GO3UB38000 

;;r IFIJ="O' , THEN100 

38 1FI*="N"THEN20B 

39 IF1*="E"THEN210 



JBI058 GG5UB1B55 GD5IJB1B£ 

OOSUB3000Q 

1FE*="N"THEN150 
lFEI="E"THENn9 

31 G0SUB1BB8 G0SUB1P55 GQSUB1O50 G0SUB1965 



3 GOSUB1B00 G0SUB1B45 GOSUB1040 GOTDl908a 
3 GOSUB1B09-GOSUB1045 GOSUBI060 GOSUB1063 

6 PBlNT- HWW W WW IWI W Wi nMlin i W KOV 
INPUTD* OOSUB30000 

7 IFDffJ-THEN220 
« REM, 

H OOSUB100B WSUB1955 GOSUB106B GOSUB1058 

'2 priht"— «w— wmmmm* ■iwwwhwke, n, s > ■■ 

IHPUTH* GOSUB3BBBB 

3 IFH»-"S"THEN190 

4 IFH*«"E'THEN31B, 
3 IFH«-"N"THEH329 

B GOSUB1000 DOSUB1055 GOSUB1045 GOSUB1060 

i ■■pRiNT" M»inMan iM «nn i «MM8. MiiiiwmwKSiH;o>" 

INPUTJ* OOSUB30000 

2 IFJ*""O'TOEN300 

3 IFJ«-"H"THeN33« 

4 IFJ*-"S"THEH23B 

GOSUB1B00 G0SUB1B45 GOSUBI03B GOSOB10S3 OOSUE1033 

IHPUTL* D05UB39000 

3 IFL*="S"THEN3fl0 

4 IFL*-"E"THEN330 

6 IFL«-"O"THEN350 

7 IFL*»°N"TMEH340 

V-INT(I*2»«ND<0»> 

1 IFV01THEN333 

2 GOEUB190g : QOSTJBlB35-COSUBlB43 OOTO1B000 

5 CJ05U316S3 C0SUBI343 

6 PRINT l 'JWMWWWWW WW I WmilU II [ (0, S) " 
I NPUTXt i OOSUB3B300 

7 IFK*-"S"THEH310 
B IFK»-"O"THEN320 

GOSUB100e GOBUB1040 GOTO18800 
B X-INT(1*2*RND(0)) 

1 IFX<>1TH£N353 




ijrP: RETURN 

:::: prints . . 

arjo/ r-iij=JSS76 P0i-:£. jSS-'S. ■■•;. 

S003 RESTORE FORM=0TO10 

8010 RENDKG 

8S1E F0KEMU-2-X0 

S020 REFIDBZ FfJPl^lTriEz NEI'T 

■:■:;.::;« ;-,;! ECHJ-28 ■ — "" ' 



NEXTM 

.8049 D8TP215 " 
0,212 

■ ;; 0T .r, pFJTi J IL , "-ti 215 rti6 

:/.;;:;;,f! Ft-\;.rr-:iK^!.^"'M.Z7. Jiji.i':. RE JCfiJEP-'.- H 

rSOCi irMii^-Ci'THENRIJHlBB 

,VJUm lFI1N$-"tl"THENEND 

::/cv< iFNM.-r:-:; "N-jjpfl;u ■"•■■L.^HEr^Ofjij'J 

J -JU:/0- f--i.il F :.f>.-h L". -0--L ■■ rr_ii P0!EJ6:?7-1.;:! 
00 

i-uri'M i!L.>:rii Nr:-;Ti. poke ;c-:3-?.8 return 



: FOBnVlTOS NEXTM PQKE36374,t 



THOMSON 

Suite de /a page £ 

1S0D0":G0T0 13955 

17Utc COLOR 5:rtTTRE 0.0:LOCflTE 8.1'?:PRIM 
TTEP1PS 

1 7«7ij LOChTE Fu.MI:CCiLC<R 1.9:ATTRB 0,0:P 
PINT* " 

1;6^£ ^OChTE FGl,NIi:COL0P !.6SwTTRS O.-H 
spRINT" " 

17873 LOCATE! FG2,Ni;j COLOR l.a:fiTTRB 0,0 
ipRIMT" " 

i:07? LOCATE FCii.NIJiCULOR 1,0:«TTRB 0.0 
: PRINT" " 
\7b'a H!=NIt2 
13077 WIl=WIl+£ 
I£=NI2h " 




> NI3 



H3+2 



23 THEN PSET^F&.21 > " ".a:T<;i 
.FG:< = 1:FC.= INT.-RND*£S.'*5:MI = 3 
136S! IF Nil.' £-3 THEN PSET' FG1, 21 J " ",S:T 

■ :,fci.' = ; : r l". i --- 1 m r ■ pm ^s^'-z-.mi-ifn- ?■'-[!■* 

170:;i- IF M12::£; THEru ?SET- FG£. S! i » ",SiT 

■ I.F0£.'-i:Fi:2 = U.iT-.ft.i[:. + £:T., + t.!HI 1 ?=;h;'.-PW + 

::eS3 " :.U3:- £3 THEM gset-FG3,21>" ".-3:T 
;.Ff,3.' = l:Fi:3=it l iTiS'Wi>t2?.+5:NI3=IMT.'ftM[ J * 

::0CT. GOTO 13056 

LSSee «TTRB 1.1:IF C.OU=7 THEB v"v = a E^i-E 

i??^! uO'STIWaYV H.IF 00=0 THEN RETURM 



13505 IF C0U=7 THEfj v v = e ELSE- V¥=l 

17507 IF STRlGf.-V^O THEN. 13530 

I35IB IF 00>3 THEN 13660 

13520 IF 00=7 THEN 13708 

13530 IF 00=3 THEN 13300 

13540 IF 00=7 THEM L79S0 ELSE RETURN 

:36CiQ LOCHTE W r Z:PSINT" " 

13&02 LOCATE U.2:C0L0R COU: PRINTGRs<-£3 ■ 

13604 IF Ta,U + lJ = l THEN 13950 

13619 IF FG=U*£ hNE> Nl = 19 THEN P3ET-F6 

,M1 i&fi*!?7.>:PSET-FG,NI ■" " : UI = £3: FG= INT ■" 

PI'iC' + 2-E.- + 5:iC;Oi>--::.i:rip--30e:RL», "05h4L£4KI" 

l7C-£9 IF FGl = !J->£ hND NIl = l9 THEN PSET.F 

Gl,WH:>Gfi*-:37>:i:C.^iJE! cC>HCy:F?ET ..FGl.NII 

)■■ "iNIl = 3:FL.l = lMi'C'ND*70.^^:"XOF^tCC!F-7 

■50:PLAV"O5fl4L£4(1I" 

13623 IF FG2=W*-2 R»r> N12=19 THEfi PSET.." 

';;.ral£ '&!?*■;" >:G0SU6 28090:PiET >FG2-Nli 

V , ':Nia'=3:FG2 = INT<R»D*2S:"5: iCLiP = 'r.CiJP-7 

&0:PLHT"rII" 

[36E5 IF FG3=W*2 AND NI3=19 THEN PSET:FG 

7-NI3 GEJ'37':GOSUB 20000:P?ET CFG3.WI7- 

'■ «iWI3 = 3:FT,3-INT.F:ML.*3u ■ •5^JCCiP=3C OP-Jd 

0:PLfiY"MI" 

13630 RETURN 

13700 LOCATE H,Z:PRINT» " 

!370£ LOCfiTE W,Z:C0LOR COU: PRINTGRt' 1 3 * 

13794 IF T(1,U)=1 THEN 13950 

13710 IF FG=H-1 F.HD Nl = 19 THEN PSET. r:^, n 

I ■■G,R?.:37 i .:PSET(FG,NI>" " : Ml = 3: FC= I»|T - RWf. 

*2S +5:SCOR=SCOR*300:PLflVHI" 

13720 IF FGI=U-1 AND NI1 = 1?P THEN PSET<FG 



l,HtlnGR*<'37i:GCELiE: iT_ifj8Ci: PSET (FG1,NI11 

" ":NIl = 3:FGl = I!vT. PHteZtt > < Z,: ;^0R = 3C0ft + ?Ci 

0:PLflY'HI" 

13723 IF FG2=W-1 AND NISEIS THEW P3ET<FG 

l.Nlc;:.CPi'3;'j:f.[;5UD S&etuji: PiET .fg£,N12> 

NIS=3sFG2=IHT\RMD»E9> + 5:5C0R = iCCR + 3Ei 

&:PLAY"HI" 

13725 IF FG3=U-1 AND NI3=19 THEM PE.t-FG 
■.Ml 7 L-RiC37i!G0SUE £000e:PSET tFG3,WI3> 
" »!»II3=3:FG3=IWT'2ft:'+5:6CCiR = SCOR + 30e:PL 
AY"flI" 

13800 LOCATE U,2:PRIMT" *l»=H+l!lF u.=35 
THEN W=35 
13S02 LOCATE U,Z:COL0R COUt PRINTGR*< 15 I 
13804 IF T(1,U>=1 THEN 13950 
13310 RETURN 

13990 LOCATE N,Z:PRIti|T" ":H=U-l:IF W> =5 
THEN N=5 

179ij2 LOCATE !I,::CJLDR COM: PR I MTGRS'.O • 
13904 IF TU,UHI = 1 THEN 13956 
13910 RETURN 

13959 LOCATE W,Z:PRINT" ":L0CHTE U.2£:PP 
IHTGIW(lB):PLHVTlL4SILHtLfieB*S0FH*FHNIR 
E*RED0#D0" 

13955 LOCATE lB f lS:COLQR 1 : PRINT-SCORE 
";SC0R:F0R 0=1 TO 509: NEXTB: CLS 

13960 IF COU=0 THEM 5C01 =C-C01 +SC0R ELSE 
SCO2=SCO2*-SCOR:GOTO6016 

14000 ' F IB D U J E U 

14010 CLSSSCREEN 0,6,0 

14928 FOR 1=0 TO 1>::lOChTE 1 - I i 1 : HOLCS'j : P 

R1NTGRS(15>:L0CaTE 40-1 , I 2: COLOR HPftlHT 



GR* (0 ^:FORO=lTO50!NEXTtl: CLS : NEXT I 
14030 LOCATE 18,I2:COL0R e!PBINTGG*<£6)i 
LOCATE £E,12:COLOR1!PRINTGRI(U ': LOCATE 
1-1.15--HTTR8 0,0:COLOR 4: PRINT3C01 : LOCATE 
£■£, 15:PRINTSC0£:F0R HH=1 Tg 1000:NEi;THH 
14975 IF 7C01=SC02 THEN ATTRB B,l: LOCATE 

lS^SiPRINT^KATCH BUL ! ■ 
14646 ATTRB 1,1: IF S C 1 > fi C d £ THEN ATTRB 
;,SJI.OCflTE 18,12:COL0R 0: PRINTGRJt4I v EL 
SE COLOR l! LOCATE ££. 12: PPINTGRK4I > 
14656 PLAY"L£4A304T4DOMI50RElHFh?IS005l5 
B[>G" 



i LOCATE 0.1£:PPlr 



"POUR REJOUER.TfiP 

Suite page 21 




_COMPTES BANCAIRES 

Vous avez recu votre dernier releve de banque et vous Mode dempioi: 

pestez contre voire banquier ? Ce programme vous ai- lf^ z / at % 6 '1 ,ls, ! ng 1 p^s sauvegardez-te sous ie , nom init- 

Z I t ■ T , , ■„„ /fciriT-A. -j'-rf. i„ FICH (ligne 8 enlrez le nombre de banques ou de comptes et ligne 

dera a tenrr vos comptes bancaires (NDTA: dou Ie sooje nom de ces banques ou comptes) 



'APPLE' 



En raison de la longueur in- 
habituelle du listing nous 
passerons ce programme 
en deux fois. 



nom) et a vous sentir peut-etre {si vous etes raisonna- 
ble) moins stresse a la fin du mois. 



Michel DOMINIQUE 



Le listing 2 est Ie programme en lui meme. Ligne 900. vous enlrez 

vos banques et a la ligne 18030 se trouve te mot de passe que 

vous pourrez changer. 

La premiere fois que vous utilisez COMPTES BANCAIRES, faites 

d'abofd tourner le programme INITFICH Apres ce nest plus la 

peine. 




INITIALISATION 
DES COMPTES BANCAIRES 
PROGRAMME INITFICH' 
MICHEL DOMINIQUE - 8/W 



7 0* = CHR* (4>:NB = 4: REM NQ 

MBRE DE BANQUES 
a HOME : INPUT "ANNEE DE DEPART 
(EXEMPLE 1984): ";AA*: PRINT 

9 AA = VAL ( RIGHT* <AA*,2)> 

10 FOR ] = 1 TO N8: READ BANQUE 
*<I>: NEXT I 

20 FOR C ■ 1 TO NQ 

2S PRINT Cj" ■;8ANGUE«(C) 

GDSUB 2000 
42 PRINT ! INPUT "SOLDE: ';S(C> 



MID* <L*,1 
i! PRINT 
110 VTAB 15: CALL - 95B: VTAB 
15: HTAB I: PRINT 'DATE :' 

120 VTAB 17: PRINT "LIBELLE:" 
130 VTAB I?: PRINT 'SOMME :' 
140 VP = *15:HP ■ 9: GOSUB 400: IF 

SOX GOTO 5000 
150 GOSUB 15000: IF S8X THEN CALL 
- 1052J VTAB 15: HTAB 9: PRINT 
■: GOTO 140 
140 VTAB 17: HTAB 9: INPUT " jX 

t 
165 REM TESTE SI LI8ELLE VALIDE 



I*(I): NEXT 630 GOSUB 1010: INPUT TC 

635 PRINT BANQUEXM);: HTAB 30: 

S = TC: GOSUB 6360: PRINT : PRINT 



170 T = 1 

ISO FOR I = 1 TO LEN (L*): IF 
X* = MID* (L*,l,l) THEN T - 
u:R - 1:1 • LEN <L«) 
1?0 NEXT I 
»RINT 200 IF T THEN CALL - 1052: VTAB 

45 M = 0! GOSUB 2020: PRINT 0; PRINT 17: HTAB 9: CALL - 848: GOTO 

SCO 160 

GOSUB 2030 
50 NEXT C 
55 GDSU8 1000 
60 FOR M = 1 TO NB 
70 GOSUB 1020: PRINT S(M) 
80 NEXT M 

GOSUB 1030 
95 PRINT D* 

"RINT WQPEN ANNEE' 
110 PRINT D*"WRITE ANNEE" 
120 PRINT NB: PRINT AA 
130 PRINT DVCLOSE ANNEE" 
140 END 

491 REM *****•****«<* 

492 REM BANOUES 

493 REM *«•«**••***** 
500 DATA : REN RENTREZ VO 

S PROPRES BANOUES 
10 PRINT D*"OPEN SOLDE. "AA'.L 



1 025 RETURN 

1030 PRINT D*°CL0SE SOLDE. "AA 

1035 RETURN 

2000 PRINT D**0PEN°BAN0UE*<C)'. 

2005 RETURN 

2020 PRINT D*"WfiITE"BANGUE*(C)' 

."AA",R"M 
2025 RETURN 
2030 PRINT D*"CLOSE"BANOUE»(C)" 

2035* RETURN 

1 REM ****************** 

2 REM COMPTES BANCAIRES 

3 REM APPLE lie OU 11+ 
REM MICHEL DOMINIQUE 

5 REM 0B/19B4 
REM 



210 VTAB 19: HTAB 9: INPUT "jS 

0* 
215 SO = VAL CS0*):SQ = INT (S 

» 100 + .5) / 100 
220. VTAB 22t INVERSE : PRINT * 

1-ECRITURE 2-ANNULATION 3-ME 

NU SAISIE ';: NORMAL iKl m 1 

:K2 = 3: GOSUB 950 
230 ON KEY GOTO 270,110,5000 
270 VTAB 22: INVERSE : PRINT SPC( 

6)'ECRITURE DE L'OPERATION. . 

.' SPC( 4): NORMAL I PRINT 
280 GOSUB 3000 
290 VTAB 22: HTAB 1: INVERSE t PRINT 

' 1-MEME BANQUE 2-AUTRE BAN 

QUE 3-FIN •;: NORMAL :K1 - 

1)K2 - 3: GOSUB 950 
300 IF KEY ■ 1 GOTO 110 
310 IF KEY = 2 GOTO 5000 
320 IF KEY = 3 THEN S7X = 1: GOTO 

5000 

344 RBI ******■««»*****«*** 

345 REM 5IGNE DE LA SONNE 

346 REM «*** 
350 SS ■ SO 



355 



l < 



■ AND > 



S GOSUB 18000: PRINT 'OPEN ANNE 
E": PRINT -READ ANNEE": INPUT 
NB.AA: PRINT "CLOSE': PRINT 

9 POKE 6,N6: REM POKE LE NOMBR 

E DE BANQUES EN MEMO] RE 

10 DIM MQ1S*(12),L*<500),DA*<30 
0>,S(5DO),[K(20> 

11 M = CHR* <4):I« « CHR* <?) 

13 REM SP GESTI0N ERREUR 

POKE 216,0: FOR ! = TO 9: READ 
X: POKE 76G * I,X: NEXT I 

15 DATA 104,166,104,166,223,154 
,72,152,72,96 

16 ONERR GOTO 20000 
1 L* « 'PEVGDCAR': REM COOES D 

ES LI BELLES 
35 REM LECTURE 8AN0UES 

FOR I = 1 TO NB: READ BANCUE 

♦(I): NEXT I 
45 REM LECTURE L1BELLES 

50 FOR I = 1 TO LEN (L*) : READ 
LI*<1): NEXT I 

51 REM LECTURE HOIS 

52 FOR I * 1 TO 12: READ MOIS*< 
1): NEXT 1 

53 MO* » "3128313031303131303130 

31* 

54 MI* * '31 29313031303131 3031 30 

31" 

55 00T0 10000: REM MENU GENERA 



57 REM » 

58 REM SAISIE D' OPERATIONS 

59 REM »*«**i**;n «■»««»**»»» 

40 S7V. = 0:TX* = 'SAISIE": GOSUB 

500 
65 GOSUB 2000 :M = 0: GOSUB 2010 



"R* THEN SS = - SO 
360 RETURN 

394 REM **•«**•■«••*« 

395 REM SAISIE DATE 

396 RBI *■»••■•***** 

400 SO'/. - Qi VTAB VP: HTAB HP: INPUT 

■■;JDUR»: IF JOUR* = " THEN 

SO/i ■ ! : RETURN 
410 JOUR - VAL < JOUR*): JOUR* ■ 

RIGHT* ("DO" + JOUR*, 2): VTAB 

VP: HTAB HP: PRINT JOUR* 
420 VTAB VP: HTAB HP + 2: PRINT 

■/•]! INPUT ";M0IS* 
430 MOIS = VAL (MOIS*) :M01S* - 

RIGHT* COO - * MOIS*, 2): VTAB 

VP: HTAB HP + 3: PRINT MOIS* 

432 GOSUB 15000: IF SBX THEN CALL 
- 1052: VTAB VP: HTAB HP: PRINT 
■: GOTO 400 
435 VTAB VP: HTAB HP ♦ 5: PRINT 

440 DT = JOUR * 100 « MOIS: RETURN 

450 GOSUB 2000 :M - 0: OOSUfi 202 

5 PRINT N: PRINT SI: GOSUB 20 

30 
J SC ■ INT CSC ) 

100 
1 GOSUB 100Q:M = 



440 NEXT M: GOSUB 1030: PRINT D 

650 GOSUB 7400 

660 GOTO 100OO 

694 REM *****«<■•■* 

695 REM EPURATION 

696 REM «»«mhi 
700 GOSUB 820 

705 HOME : PRINT D*"MONCIO" 
720 GOSUB 1000 

725 FOR C ■ 1 TO NB:M m C: GOSUB 
1010: INPUT S<C): NEXT C: G0SU8 
IQ30:AA - AA ♦ 1 

726 FOR C * 1 TO NB 

730 NF* ■ BANQUE*(C) » '.■ « STR* 
(AA) 

735 GOSUB 2000 

740 M = 0: GOSUB 2020: PRINT 0: PRINT 
S(C) 

745 GOSUB 2030 

750 NEXT C 

740 PRINT "OPEN ANNEE': PRINT CHR* 
<4>j"URITE ANNEE": PRINT NB: 

PRINT AA: PRINT 'CLOSE 1 : PRINT 
D* 

794 GOSUB 1000 

797 FOR M = 1 TO NB 

BOO GOSUB 1020: PRINT S(M) 

802 NEXT M 

605 GOSUB 1030 

810 PRINT D*"N0MONCIO' 

815 PRINT D«: RUN 

B20 TEXT : HOME 

825 HTAB 10: PRINT "EPURATION" 

830 VTAB 3: PRINT "ATTENTION.VO 
US NE PQUVEZ EXECUTER CE 
PROGRAMME QUE SI VOUS AVEZ S 
AUVEGARDE LES FICHIERS '" 

835 VTAB 10: PRINT "SI TEL EST 
LE CAS PRESSEZ <RETURN) 
SINQN PRESSEZ (ESC) POUR RE 
VENIR AU MENU" 

840 POKE - 16363,0: GET V* 

845 PRINT i IF V* = CHR* (13) THEN 
RETURN 

850 IF V* < > CHR* (27) THEN 
VTAB PEEK (37): GOTO 840 

855 POP : GOTO 1OO0O 

894 REM »*«»»*«**«« 

8?5 REM OONNEES 

896 REM liiiiiiim 

900 DATA : REM RENTRE 
Z VOS PROPRES BANOUES ICI 

910 DATA "CHEQUE PAIEMENT" ,"CHE 
QUE ESSENCE", 'VERSEMENT GUIC 
HET'.'RETRAIT GUICHET" ,"RETR 
AIT DISTRIBANQUE", "CARTE BLE 
UE\ "AGIOS", "REMISE CHEQUES" 

920 DATA "JANVIER', "FEVRIER" ,"M 
ARS",*AVRIL",*MAI",'JU1N',"J 
UILLET" , "AOUT" ."SEPTEMBRE" , " 
OCTOBRE" , "NOVEMBRE" , " DECEM9R 
E" 
947 REM *«»»*«!!**»»**.**'.•»*«* 
94B REM TEST MEHOIRE CLAVIER 

949 REM it********************* 

950 POKE - 14348,0: WAIT - 1* 
384,128:KEV = PEEK ( - 1638 

955 IF KEY ( Kl OR KEY ) K2 THEN 

CALL - 1052: GOTO 950 
940 PRINT ! POKE - 1436B.0: RETURN 

994 REM it*****:************** 

995 REM ACCES AUX FICHIERS 

996 REM ***i**************i* 
1000 PRINT M'OPEN SOLDE.'AA", L 



492 REM MENU BANQUES 



";TX*:" 



( "! NORMAL 



) VTAB 4: FOR I ■ 1 TO NB: PRINT 

"< ";!;■ ) " ;BANOUE*(I): PRINT 

! NEXT 1 
1 PRINT "< ';NB + 1 ;* > MENU 

GENERAL" 
) VTAB 23: HTAB 1: INVERSE I PRINT 
TAPE? LE NO DE VOTRE C 

HOIX ■;: NORMAL :K1 - 1 : 

K2 = NB * 1 ! GOSUB 950 
] C = KEY 
1 IF C = NB * 1 THEN POP : GOTO 

10000 
5 NB* = BANQUE9(C):NF* = NB* * 

'.' * STR* (AA) 
) RETURN 



594 REM *«»*»•»»! 

595 REM SOLOE 



74 INPUT SC t 

78 GOSUB 1030 

80 HOME :NE = 38 - LEN (TX*) - 
LEN (MBS): INVERSE : PRINT 
■ ";NB«; SPC( NE>iTX*i- ": NORMAL i 
t 
90 VTAB 3: HTAB !: PRINT TAB( 

lOJj'LIBELLES": PRINT 
100 FOR I = 1 TO LEN (L«): PRINT ( 



J NX ■ 8:TX* = "SOLOES": HOME 

:VC = (31 - LEN (TX*)> / 2: 
HTA8 VC: INVERSE : PRINT " 

•** "iTX*;' ««■ ': NORMAL 
3 G0SU8 1000 
5 VTAB 4: PRINT TAB( 7); "BAN 

QUE'; SPC( 1B)['SOLOE': PRINT 

: PRINT 
D FOR M - 1 TO NB 



D* 

2035 RETURN 

2494 REM «<»niim»«*m»*«» 

2495 REM VISU ENREGI STREHENT 
2494 REM ««*•««**«>(*•*•***««■ 

2500 VTAB 3: HTAB 1: CALL - 95 

B 
2505 VTAB 3: HTAB 1: PRINT TAB( 

10>i'LieELLES": PRINT 
2310 FOR I = 1 TO LEN (L») : PRINT 
MID* (L*,I,1);* ';LI«(I): NEXT 

1: PRINT 
2520 VTAB 15: CALL - 958: VTAB 

15: HTAB 1: PRINT 'DATE :' 
2530 VTAB 17: PRINT "LIBELLEi" 



2540 VTAB 19: PRINT "SONNE :' 
2550 RETURN 

2994 REM ****•**********»*■«» 

2995 REM ECRITURE OPERATION 

2996 REM »«**•»•«»»»«*•«»»«• 
3000 DZ(C) ■ 1:N m N 4 1 

3010 GOSUB 350 :SC " SC * SS 

3020 GOSUB 2000 

3040 M = N: G0SU8 2020 

3050 PRINT DT: PRINT X»; PRINT 

SO 
3040 GOSUB 2030 
3070 PRINT D«: RETURN 

3994 REM ***••»*•••«••■******** 

3995 REM RECHERCHE DICHOTOM1QUE 

3996 REM > 



4020 IF N < 1 GOTO 4130 

4030 II - 1:15 = N 

4040 M = Hi GOSUB 2010: INPUT 

40S0 IF II " IS AND D < > DA GOT 
4130 

4060 M = JNT ((II ♦ IS) / 2> 

4070 G0SU6 2010: INPUT D 

40B0 IF DA ( D THEN IS = M: GOTO 

4050 
4090 IF DA > D THEN 1 1 - M * 1: 

GOTO 4040 
4095 1ND = M 
4100 M = M - 1: IF M ( 1 GOTO 41 

20 
4105 GOSUB 2010: INPUT 
4110 IF <0 • DA) THEN PRINT :D 

R = I: GOTO 4100 

4120 INO ■= M • 1 

4121 IF OR = 1 GOTO 4130 

4122 M = IND 

4123 M = M + li IF N ) N GOTO 41 
30 

4125 GOSUB 2010: INPUT D 

4127 IF <D = DA) THEN PRINT :0 

R * 1: GOTO 4123 
4130 GOSUB 2030: RETURN 

4494 REM f*»l***ao**i**ift«a<» 

4495 REM RFCHFRCHE LINEAIRF 



194 REM • 



4520 IF N ( 1 THEN GOSUB 2030: 

RETURN 
4540 K = 
4550 K = K * 1 : IF K > N GOTO 46 



30 
4555 M = K: GOSUB 2010: INPUT 0, 

XS.SO 
4560 IF < DD THEN GOSUB 350: 

SP = SP * SS: GOTO 4550 
4570 IF D ) DF GOTO 4430 
4580 NR ■ NR + 1 
4590 S(NR> = SD:L*(NR) = X* 
4400 MOIS = INT (D / 100):JOUR = 

D - MOIS « 100 
4410 OA*(NR) = RIGHT* <"00' ♦ STR* 

(JOUR), 2) + V * RIGHT* (" 

00" t ST« (MOIS), 2) « ■/" « 
STR* (AA) 
4420 GOTO 4550 
4430 GOSUB 2030 
4640 PRINT D*; RETURN 

4994 REM *•**«•**•******»•*** 

4995 REM TR1 APRES SAISIE 

4996 REM ft******************* 
5000 HOME 

5010 IF IK(C> = 1 THEN D"/.(C) = 

0: GOSUB 450: GOSUB 5500 
5030 IF S7X GOTO 10000 
5040 GOTO 60 

5497 REM *■■*•**•«*«<«*■»••« 

5498 REM TRI BULLES 

5499 REM »«*» »•*»•» »»«»•»»»« 
5300 PRINT "(< TRI DU FICHIER * 

}NF*j" ))' 
5505 GOSUB 2D0O:M = 0: GOSUB 20 

tOi INPUT N 
5520 E - N 
5350 MAX = E:B = 
5560 FOR I = 1 TO MAX - 1 
5570 M = 1: GOSUB 2010: INPUT Dl 

,Xl*,St 
35B0 M - 1 * 1: GOSUB 2010: INPUT 

D2,X2*,S2 
5390 IF 01 < - 02 GOTO 5430 
5400 1-1=1: G0SU8 2020: PRINT D2 

: PRINT XZ*: PRINT S2 
5610 M = I ■* I: GOSUB 2020: PRINT 

01: PRINT XI*: PRINT St 
5620 E "= I:B - 1 
5630 NEXT I 

3640 IF B < > GOTO 3550 
S650 GOSUB 2030 
5660 RETURN 

5B97 REM «»»«*«»•««»»»»«««•» 
5B9B REM MISE EN ROUTE IMPR. 

5899 REM M<t*c~*ft**»****x«**** 

5900 HOME : VTAB 8: PRINT 'PREP 
ARE2 L'lHPRIHANTE' 

5M5 VTAB 111 HTAB 5: PRINT "PR 
ESSEZ (RETURN) POUR IMPRIMER 



5940 IF KEY* - CHR* (27) THEN 

POP : GOTO 40 10 
3950 GOTO 5930 

5994 REM »»»»»»»•»»*«#»•»»»*»*• 

5995 REM IMPRESS I ON/CONSULTAT 10 

5996 REM « 



4000 IF KEY = 2 THEN TX* = 'IMP 

RESSIGN'sPR = l:NX - 11 
4005 IF KEY ■ 3 THEN TX* ■ 'CON 

SULTATION":PR - OiNX = B 
401O GOSUB 500: GOSUB 7000 
4015 IF NR - THEN VTAB 10: PRINT 

*PAS DE RELEVE DANS LA PERIO 

DE": FOR I = I TO 1500: NEXT 

I: GOTO 6010 
6020 IF PR THEN GOSUB 5900 
6040 IF PR THEN HOME : VTAB 14 

: HTAB 12: PRINT "<< IMPRESS 

ION ))" 
4045 IF PR - THEN G0SU8 7030 

: GOTO 4090 
6030 PRINT WPRE1" 
4040 PRINT IfSON'i 
4070 PRINT 'RELEVE DE CDMPTE-BA 

NCAIRE-; 
4080 POKE 36,79 - LEN (MB*): PRINT 

NB*: PRINT : PRINT 
6084 Ml = INT (DO / 100) :J1 = 

Dl- 100 * Ml 
6086 <•• INT (OF / !00):J2'"= D 

- too * m 

40»C PRINT 'OU *{JIi" 'jMO!S*<M 
.);" I9";AAi' AU *:J2i" ' ;MO 
1S*(M2);" 19":AA 

6100 PRINT : G0SU8 4400 

6110 ORINT "";: POKE 36,3 + 2 * 
PR: PRINT "DATE -1 ;: POKE 36,9 

* 4 * PR: PRINT "'" ;: POKE 
36,12 H8t PR: PRINT "L1BE 
LLE" ;: POKE 34,71 + 31 * PR: 

PRINT •! "{ 
4120 POKE 34,24 t 32 i PR: PRINT 
■CREDIT";: POKE 36,30 * 35 * 
PR: PRINT ■'";: POKE 34,33 * 
36 * PR: PRINT "DEBIT" ; : POKE 
34,39 t 39 » PR: PRINT " " j ■ 
IF PR THEN PRINT 
6130 GOSUG 4400 
4132 IF PR = THEN POKE 34,7: 

HOME 
4135 SI = 0:32 = 
6140 GOSUB 4500:S = SP: PRINT ■ 

";: POKE 34,9 * 4 » PR: PRINT 
••";: POKE 34,10 ♦ 5 « PR: PRINT 
LEFT* ("SOLOE PRECEDENT" ,1 1 

* 4 * PR);: POKE 34,21 * 31 
■ PR: PRINT ""|: G0SU8 431 


4150 GOSUB 6500 
4140 FOR I = 1 TO NR: PRINT ■'" 

;: POKE 34,1 » 2 * PR: PRINT 

DAt(I); 
4170 X* ■ L*(I) 
6180 FOR J = 1 TO LEN (L*>: IF 

X* - MIO* (L«,J,1) THEN R m 

J:J = LEN (L*> 
4190 NEXT J 
62C0 POKE 36,9 + 4 I PR: PRINT 

V;: POKE 36,10 * 3 1 * PR: IF 

PR = THEN PRINT LEFT* (L 

I*(R),m- 
4202 IF PR = 1 THEN PRINT LI*( 



R); 
4205 POKE 34,21 + 31 * PR: PRINT 

4210 SO = S<1): GOSUB 350:S ■ SS 

4220 G0SU8 6310 

4225 IF PR - AND I / 13 - INT 

(I / 13) THEN GOSUB 7400 
4230 NEXT I 
4235 IF PR = AND PEEK (37) > 

20 THEN BOSUB 7400 
4240 GOSUB 4500: PRINT "!"j: POKE 

34.9 + 4 » PR: PRINT ""j: POKE 

36.10 + 5 » PR: PRINT "TOTAU 
X'j: POKE 36,21 * 31 * PR: PRINT 
•!■;: IF SI ( > THEN S ■ 

SI : GOSUB 6360 
6250 POKE 36,30 ♦ 35 • PR: PRINT 

•!"p IF B2 ( ) THEN S - 

32: GDSUB 6360 
6260 POKE 36,39 * 39 « PR: PRINT 

"!';: IF PR THEN PRINT 
4270 GOSUB 4500:S "SI - S2: PRINT 

•••;: POKE 34,9 + 4 « PR: IF 

PR THEN PRINT " ' NOUVEAU SO 

LDE'i 
4272 IF PR - THEN PRINT • !NO 

UV, SOLOE" ; 
4274 POKE 34,21 * 31 * PR: PRINT 

"'";: GOSUB 4310 
4280 GOSUB 6400 
4285 IF PR = THEN GOSUB 7400 

: TEXT 
4290 PRINT D*"PR£0": PRINT D* 
6300 GOTO 6010 
4310 IF S = THEN POKE 34,30 * 



I PR: PRINT ' 



; GOTO c 



ASUIVRE.. 



ALPh 


1AI 


J> 


ORIC 






ORIC 1 ATMOS 


f 


r^^mm u 


ar^m 


w 


\S1 If W^ 


r^X ? J^^ 








3^^ 


Ce programme inspire du 


eu de Pous-Pous va dessi- 


\ t%*^$W$ 




■** * *° \^*^ 


\^y- 


N^^ 


t£i^0w 


ner puis melanger les touches du clavier de votre 






y j^^^^^^^-^ 






micro prefere. A vous de les remettre 


en place ce qui 












devrait vous occuper un bon moment ! 












} 






Stephane CALLEGARI 












Possesseurs d'Oric 1, ATTENTION ! 2 liqnes sonl a modifier: * 


^"^^1^^^^^^ 




Vj \vSSsm J 






4100 NC = MID$ (STR$ (NC), 2 

4110CURSET 138, 180,0 

et rajouter la ligne 28 HIMEM 










L 


-r , r \-^^gF^ 


\ 


f 


#9800 
















1 REM**:t:1 f:E4::}"*:.#: WXXX fXi.tt.XX ?7, 32 


78.79,88,32,81 


'75 


2130 


DRTfl 0,9,9.3.20.3,20.3 


304f 


DD=INTfRND(n*43 


12 REM* 


* 1548 


DRTfl 


82. 32,83,84,85, 32. :;?, 




'127 




3850 ;-.:e^::'..'+'dd=o^—:dd=i i 


14 REM* fnPHflMIJM'GRIC 


* 88,39 


32,90.91,92,93 


'76 


2149 


F0RI=IT029 


8R60 *■■'[)= VV+C DD=2 >-'! DD=3 5 


16 REM* 


* 1550 


DATA 


94,95,96,98,32.99,32, 


1330 DRTR 0,0,0. 48. 49,40, -1^.4r- 


2159 


REROflD 


307P IFT0. KD, YD >-OTHEN3040 


IS REM* St«Pha«e 0aH*8«ri 


* 100,32. 101 


32,102,32.183 


'77 


2160 


RD=*9300+S*RD 


■7080 NF=NF+1 


28 REN*. ORIC 1 on flTHOS 


* 1568 


[■•RTR 


32,184,32,195.32,106, 


1835 DRTR 0,0, 8.56. 82, 43-32. 12 


2179 


F0PJ=0TO7 


3890 FOPI=0T02 


22 REM* Noyerabre 1984 


* 32, 107 . 94 . 95, 96, 37, 32,3? 


'78 


2130 


REAEC9 


3199 TT=Tr : .r xv vy. I ;:■ 


24 REM*: 


* 1578 


t.'RTFl 


103,109.110.111,86,12 


1890 [>RTR 0.0.9,1,2,2,2,1 


2199 


POKEAD+J.CO 


8110 Tr.xy.yy, I ::.=TC(KD,YD,I • 


26 REM**:*:.** *■*■*:-;■* ft ft t.tl:***** 0.36,121 -36. 122, 86, 183,86, 124 


2?OQ 


HEXTJ 


312f 


TCtXU, il>,l .'=1 1 


100 GOSUB1000 'PRESENTATION 1530 


:.f-TR 


86,125,86.126.86.127. 


1895 pflTfl 0-0,11,^2.0,48,16,32 


2210 


NEKTI 


3130 NEXT 


192 G0SIJ6.1400 REOuNFIGURATT 112, 113, 114, 115, 115,117,118, 119 


'30 


2220 


DATA 33, 0.0, 0.3, 3, 6,6, 13 


3140 XV=XD-YV=YD 




1598 


FORI 


33T012? 


!800 [)hTh O,0,i'i,86.36,6O.86.-^. 


2225 


DATA 35,0,0,0.54,60,24,56, 


31 5*" 


i.t. i ;| Mh=.JBH 


~104 GO3UB1200 'REGLES 


1630 


RD=#9C00*8*I 


•31 


44 




3: 1 f.r 


RETLIRN 


106 I.OSLIE2500 'DECOR 


1610 


F0RJ=9T07 


1905 DRTR 0,0.1 .9.1,1 . 1,7 


2230 


DATR 36,0,0,9-63,63,48,48, 




REM 


103 GOSIJ62300 'RFFICHAGE CLA 1620 




REflDCO 


'32 


48 




329E 


REM TEST ORDONNE 


VIER 


1639 




F'.-K-EHl^ I.CO+64 


1910 DRTR 0,0,8.2,2,3,2,2 


2235 


DRTfl 37.0.3.3,32,35-51,51, 


3295 


REM 


110 GOSUB300O 'MELANGE 


1649 


HEXTJ 


'33 


35 




330C 


B0=TRUE 


112 '"iO8U82980 ■'AFFICHrtGE CLA 165* 


HEXTI 


1915 DRTR 0.0. ft. 16.32,0,32. 16 


2240 


DflTR 33,8.0,0,3,3,6.6,12 


381 r 


F0RI=1T03 


VIER 


1669 


DflTft 


0,2,2.58,16,13,16,16 


'34 


2245 


DRTfl 44,0,0.0,48,43..24.24, 


332r 


.FDPJ=1T014 


114 GO8UB3500 J JEU 


'33 






1320 DRTR 9,9,0,4,4,4-4,7 







333S 


IFTCT I, J,0>OJ+a-l> 


lit: GOSUB3900 'U0UVELLE 


PRRT 1665 DATA 0,9,8,2,5,1,2.7 


'35 


2250 


DRTR 40,0,0,8,8-0,1,3.7 


:«4THENB0=FRLSE ,1=15 ■ 1=6 


IE 


'34 






1925 r'iriT. 0. 0,0. 14,8, 12. fi, P. 


2255 


DRTfl 41,15,6,14,27,51,32,6 


3340 


NEXTJ 


US IFNPTHEM119 


1679 


DHTfi 


12,20,14,8,8,8,8,0 


'86 


3.63 




835r 


NEXT I 


129 GO8UB40OO 'DECOR FI 


M '35 






1938 DflTR 0,2,9,2,0,0,0,8 


2860 


DRTR 42-12,24,24-48,48,8,6 


336' 


RETURN 


122 END 


1675 


WITH 


0,9,0,6,1,3,1,6 


'87 


3.63 




3437 


REM 


99? REM 


*36 






1935 DHTH 0,0,0, 16, 9, 16,16.32 


22 1 5 


DRTR 43,63,51,49,43,43,9,6 


-'■4?r 


REM JEU 


■-08 REM PRESENTS T I ON 


1688 


DfiTFI 


18.39,10,39,10,0,0,9 


'83 


3,63 




349= 


REM 


993 REM 


'37 






1940 DHTH 5,5.5.0,0.2.2,0 


2270 


DATR 123,35,3,35,51,51,8,6 


350C 


NC=0 C-LS PRINT 


1099 HIRES IHK0 PFIPER3 


1683 


PHTH 


9,9.0,1,2,5,1,1 


'39 


3-63 




3585 


PRINT"A TOI DE -JOUER. . "J 


1010 RUSi^'ALPHANIJM'OPIt " 


'38 






1945 DflTR 0-0,0,51,42.51,42,48 


2275 


DRTfl 124,12,6,6,3,3,0,63,6 


3510 REPERT 


1020 CUR8ET72,90,9 FILLS, 1 


, 12 1698 


QflTfi 


4,6,12,4,6,44,0,0 


'90 


3 




352P 


XS=KEY* 


1030 CUR8E. 173,32,8 FILL25, 


1.1? '39 






1950 DRTfl 0,0.0, 46. 4, 4, 4, 36 


3330 


DflTR 125,0.24,24,48.48,0,5 


3536 


IFXffi-. CUPS' 3JiORX*>CHR« 11 >T 


1040 CURSET 168, 92,0 "FILL25 


,1,19 1695 


G*TTR 


0,9,9,7,4-2,1,7 


'91. 


6. 56 




HEN3739 


1050 niF:3ETl74,82,9FILL25 


,13 '48 






1955 DRTfl 0,0,9.48.42.43,42,18 


2285 


DATA 47.0,0,2,5,7,5,5,0 


3545 


XC^XV'+CXa^CHPgi-- 1 1 v : ,-rxB-CH 


1055 fopi = itoleh>:aij=> 


1788 


DflTR 


18,4,8,18.0,8,9.0 


'92 


22^0 


DATA 92,0,0,29,9,9,9,9,0 


EKlftS) 


1060 i CL.1RSET73+I*6,90,0 


'41 






I960 DRTR 8,0,0,10.46,14,46.42 


2295 


DATA 94,0,0,44,21,5,5,4,0 


355P 


YD=YV+f XS=CHPSf 8 > •>-', X*=CHR 


1065 ' CHRRASC<:M1DS(AUS,I 


,1», 1785 


DflTFl 


9,0,0,0,1,1,1.0 


'93 


2308 


DRTfl 95,9,0.39,29,18,17,33 


S'9> 






'42 






1965 C'fiTft 0,0.0,26.34- 19,10.59 


.0 




3561 


IFTC( XD, YD, >=0THEN3730 


1870 NEXT 


1718 


DHTfl 


0.4,18-32,0-48,16,32 


'94 


2305 


DRTR 96.0,0,1,2,4,3,0,0 


35 ~f 


NC=NC+1 


1975 CURSET17, 10, 1 


43 






1978 DRTR 0,0, 0.43- 34. 43, 42, 42 


2310 


DATA 64,0,0,4,19,36,42,36, 


353r 


FOPI=0TO2 


1080 t'Pni,i,-':i .0. i dpfh-10,188 


■1 1715 


DHTH 


8,0,0,7.1,2,2,2 


J 95 







35?i 


TT=TCCXV,YV,I> 


1085 DF'ftH-811. 0,1 ['PR1.I0.-130, 1 '44 






1975 DflTR 0,9,0,46,4.4,4.4 


2315 


DATR 63,0,0,40,43,48,49,40 


360 r 


TC(XV,YV, I )=TCf XD.YD, H 


1090 flU¥="S-t5Ph..ii.iv? CaUMari" 1729 


DflTR 


0,9,29, 10,20,3,8,0 


'96 


,0 




361 r 


TC<XD,YD,I>=TT 


1095 F0RI = 1T0LEI^PU*^ 


'45 






1980 DflTR 0-0,0-9,0,0,12,12 




RETURN 


362f 


NEXT I 


: \--y: K'.Kr:---- ■:■■■>■:■: ■:■" ■ : :" ; : ■ 


1725 


DflTR 


0,0,8,0,1-0,1,9 


■9? 


2497 


REM 


363r 


F0PI=1T02 


1103 ' CMRRfiSC<niMffiU*,l 


, m, -46 






1-85 DRTR 0.0-0.30,8,4,8,30 


2498 


REM DECOR 


364P 


CUPSET' YV-1 >*12+42,CXV- 


8,1 


1738 


DHTfi 


10,4,10,32,16,32,16,3 


'98 


2499 


REM 


1>*12+199,0 


1119 NEXT 


2 '47 






1990 DflTR 0.0,9,34.20,8.20,34 


2500 


HIRES PRPER5'1NK3 


364P 


CHRR127,9,9 


1120 CL3 PRINT 


1735 


DATA 


8,0.9,9,1,8,0,1 


'99 


2518 


RUS="RLPHANUM'0RIC" 


3659 CHflB_TC<XV,YV,t>,l'l 


1125 PRINT"Un Pen de fatie 








1995 DRTR 0,0,9,6,3,3,8,6 


2529 


CLi^8CTr:3.22,0 


36SI 


: CURMnyg;0,9 




1748 


MTR 


0,2,4,36, 16,48- 16, 3E 


'109 


7530 


FCiRl = lTOLEN<RU55> 


366! 


CHRR127,0,9 


1130 RETURN 


'49 






2000 E>orfl 0.0.0.34.34,54,23,8 


.3540 


CHftRfl3c< mid« mm, 1 , 1 > J, 


-id. 7f 


CHARTi:r;:v..Yy-2). i, i 


1197 REM 


1745 


DflTR 


0,0,8,9,1,1,1,0 


'101 


0,1 




36?;r 


CURMOV6,0,0 


1193 REM REGLES 


'50 






2005 DRTfl 0,0,0,12,10,12,19.12 


255ft 


' DJRH0V1 0,0,8 


3696 


XV=XD ' YV=YD 


1199 REM 


1758 


DflTfi 


0.4,2,34-20,16,16,32 


'102 


2560 


NEXT 


370i ; 


NEXT 


1200 TEXT PAPER 1INK0 


'51 






2010 DRTR 0.0,0,26,26,13.22,22 


2570 


8MR3ET36,53,8 FILLI14,1,16 


371 e 


5OSUB4109 'AFFICHAGE S 


1210 PRINTPRINT"Re t >les di 


ma. 1?55 
'52 


DflTR 


6,12,6,12,6,8,36,0 


'103 

3015 DRTR 0,0, 0,20. .32. 34,34.34 


2575 


CURSET216.50,8FILL114,1,2 


CORE 
372C 


G05UB3399 'TEST OPDONN 


1229 PRINT PRINT" Sur I'e 


cran 1 769 


DRTB 


0,4,14,4,0,56,8,56 


'104 


2539 


CURSET156,54,0 


E 




est dessine le clavier" 


'53 






2020 DRTfl 2.4,3,4.2,16,16,32 


2535 


FILL16,1,6FILL8,1.1 


3?3f 


UNTIL BO OR XS='-S" 


1230 FPINT"de 1'ORIC ATMOS 


. Ce- 1765 


DflTR 


0,2,2,0,34,18,8,4 


•105 


2390 


FORI'.ITOS 


3741" 


RETURN 


clavier sera" 


'54 






2825 DHTH 8.4,2,4,3,0,9,32 


2600 


■ CUR5ET166,54+< 1-1 5*8,8 


3S?r 


REM 


1240 PRIHT"tteUn9e. Le b«t 


du. j 1779 


DflTR 


0,31,16,16. 16,16,31,0 


■106 


2619 


■ F0RJ=!T07 


389 f- 


REM UNE N9WELLE PRRTIE 


en sera, de le " 


'53 






2O80 DRTfl 16.40.3.16.18.4.8,16 


2628 


READ AS 


389: 


REM 


1250 PRINTVecomtituer- ey 


dePl 1775 


DflTR 


0,62,2,2,2,2-62,0 


'107 


2630 


CHRRflS.8, 1 


890< 


CLS PRINT 


■scant les touches" 


'56 








2640 


CURM0V6.8,8 


391< : 


PRINT"Urie nouvelle P?rtie 


1260 PRINT" Sracff WJtK luaftf 


9 fie 1789 


DRTfl 


0-0,0,57,34,49,32,59 


'108 


2650 


NEXTJ 


o m 




does. " 


'57 






2048 DflTR 0,0,0,0,56,0,8,8 


2660 


NEXT I 


3921- 


CETXS 


1270 PRINT PRINT"Le PfiJtei 


Pe de 1785 


DflTR 


0,8,9,38,8,8,40,6 


'109 


3679 


XV=1 Y\'=14 


393P 


IFXS1> , '0"flHDXI»< , >"N"THENPIN 


(tepl*Bgi»*Ht est le" 


'58 






2045 DRTfl 0,1,1,1,1.5,3,1 


2680 


CU"'3ET90, 130.8 


C GOTO3920 


1230 PRIHT"meWe W3.U PEWES-POU 1790 


DflTR 


0,8.0-12,18,18,22,13 


'119 


2690 


flU-:i="SC0RE 0" 


394P 


HP=XS="0" 




'59 






3050 DRTR 0,0,0,0,0,16,32,0 


2780 


fori=itqleh<:rm*) 


395r 


IFNOTNPTHEN3990 


1290 PRINT PRINTS C9.5e v 


ids e 1795 


DflTR 


0,8,0,17,17,21,21,10 


'111 


2710 


C-HRRASC< MID*''RU*, 1 , 13 >, 


396r 


NC$=" 


Unt symbol i see Par £3." 


'60 






2955 DflTR 0,1.3,5,1,1.1,1 


8,1 




39?r 


GO3UB4110 


1309 PRINT PPIHT"3itiPle. R 


vtms 1808 


DRTfl 


0,0,8,23,16,24,16,28 


'112 


2729 


ajRnovs.0,0 


395r 


RETURN 




'61 






2060 ORTR 0-32.16.0.0.0.0 


2739 


NEXT 


399" 


REM 


1310 PRINT PRINT" Pour arreter 1385 


DflTR 


8,0,0,24,20,24,29,20 


'113 


2749 


DRTfl 32 ■ 33 - 35, 36,37, 38,44. 


399P 


REM DE'30P FIN 


le Jen taPez su.r S. " 


'62 






2065 DATA 0,0,0,9.7,0,9.0 


49,41 


42,43,123,124,125,47,92,94 


399E 


REM 


132S PRINT PRINT" Pwr cowMenc 1818 


DflTR 




•114 


.95,96,64,63 


400£ 


MIPE3 PRPER3 I HK 1 


er a joner ts.Pez sur " 


'63 






2078 DRTR O.y, 16. 3. 60. 3, 16,0 


2798 


RETURN 


401 r 


HUt="fllj REVOIR " 


1330 PRINT "une touch*-...". 


1815 


DRTfl 


8,9,8,20,20,3,3,8 


'115 


2397 


REM 


492P 


ryPSE 189, 109,0 


1340 GETX* 


•64 






887':, DRTR 0.0.0.58.84.50.34,3^ 


2898 


REM RFFICHRGE CLAVIER 


40 3r 


FOPI=1TOLEN(RUS) 


1330 RETURN 


1320 


DRTfl 


9.0,0,20,20,20-29,8 


'116 


2399 


REM 


4m" 


■ chrprsci:mids(ru*,i.i:o. 


139? REM 


'63 






308O DRTR 0,0.0.42,46.46,46.10 


2900 


F0PI=1T05 


8,1 




139:? FEM RECONFIGURATION 


1325 


DRTfl 


0,8.16-0,16,16,16,16 


'117 


2910 


i:UR8ET42,100-«I-l>*!2,0 


405C 


CUPMOV10,0,0 


1399 REM 


'66 






20: : 55 CRTR 0,0,0.59,38,33.33,57 


2920 


' F0R-J=1TO14 


406? 


NEXT 


14R9 DIMTC-6,15,2> 


1830 


DRTfl 


0,0,0,8,28.28,28,3 


'113 


292-5 


CHRR127.0.0 


407E 


RETURN 


1420 FiIIRI = IT05 


'67 






2990 DflTR 0.0. 0.32, 9,9, 0,9 


3980 


CHHRTCf I.J,n,l,l 


489? 


REM 


1430 F0RJ=IT014 


1835 


DRTfl 


0,0,0,24,20,24,16,16 


'119 


2940 


CURMOV6.0,8 


489^ 


REM RFFICHRGE SCORE 


1440 ' TCO,-J,0'-.Ha- 


IJM4 '68 






2995 DRTR 0.0.0,12.80 4.4,4 


2945 


CHflP12?,9,0 


409? 


REM 


1458 REflBTCtT,J.l ) 


1348 


DRTfl 


0,8,24,16,35,18,26,3 


'129 


2950 


CHRRTKI, J,2V1,1 


419P 


NCS=ST,P*f NC > 


1460 PERDTC:i,J.2> 


'69 






*2190 DRTR 0,0,0-8-20.4,3.23 


2960 


CURn0V6,0.0 


411? 


n.T;8ETl 30, 139,0 


1479 ■ NEXTJ 


1845 


DRTR 


0,0,48,16,11.17,49,3 


'121 


2979 


NEXTJ 


412P 


FOPI = 1TOLEN<NC*-' 


1439 NEXT I 


'78 






2105 i:,R~R ri 24,4,12-4,24 


2980 


NEXT I 


413C 


CHRP127,0-8 


1490 DATA 32. 33, 34. 55, 36, 3 


?,3&. 1358 


DflTR 


0.8.0,51,42.43,42,51 


'122 


2990 


RtTTIJPN 


414£ 


rHRFR3^MIDSOJC*,I.l J>, 


33 49,41,42,43.44,45 


VI 








299? 


REM 


0,1 




1500 pflTfi 46.47.48.49,59.51.38. 1355 


DRTfl 


0,0,8,40,3,8,8,46 


•123 


2393 


REM MELANGE 


415P 


cupnrjvs,0-8 


52,32.53.32. 54,55,56 


'7? 






2115 DRTR ft 9-0.28. 1.6.3.4,28 


2399 


REM 


41 66 


NEXT 

RETURN • 


1510 DRTR 57,58,59 32-60. S261, 1868 


DRTfl 


0,14-4,4,56,32,32,56 


•124 


■3000 


as primp jb nte-Vniwe. " 


41 7C 


32. 62.32,63. 32,64.32 


'73 






8180 DRTR O.y.O 12.16-28-20,3 


3918 


PPIHT"I1 f*..-.t Patient?'- ! 






1529 DRTR 65,33, 66, 3, : -. <:-?■ V 6'8 186=, 


DRTR 


9,4,4.6,48.49,43.49 


'125 


(iivnite environ."; 






32.69,82,70.32,71,72 


'74 






£125 DflTR 0,0.0,23,4,8.3.8 


3028 


HF=-ri 8M-FALSE 





O 


1530 DRTfl 73,74,32.75,32,76,32, 1870 


DRTR 


0,8,8.16,40,56,40,48 


'126 


3039 


REPEAT 




J^%?® 






HEBDOGICIEL 27, rue du Gal-FOY 75008 PARIS 






0J^J 


'M^kj^Sx 


VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 420 FRANCS POUR 52 NUMEROS AU UEU DE 


^jfNs^A 


Ergwd^^^MV 


52 x 10 


= 520 FRANCS. ABONNEMENT POUR 6 MOIS : 220 FRANCS. Pour I'etranger: + 80 F. pour 1 AN 




*^wra3i^^^HV 












+ 40 F. pour 6 MOIS. 




^fcS^ jgB/y 


?Y|jflHi| 


NOM: 






MATERIEL UTILISE : 






f^~^$Z£j, 


/ / ^^^iiiBm 


PRENOM : 




CONSOLE : 










E3^-5r^Hlr 


ADRESSE: 




PERIPHERIQUES 










«s2^^Sl_— 


REGLEMENT JOINT : D CHEQUE 


QCCP 












&2f\ M 


wKz/'A — 

























SIMULATEUR 
DEVOL 



Vous n'avez pas les pieds sur terre et le ciel vous 
attire ? Voici un simulateur de vol aux instruments, 
qui vous donnera un bon apergu du pilotage sans 
visibility. 

Pierre BARTHE 

Mode d'emploi: 

Vous pouvez stopper la musique de presentation en appuyant 
sur une touche Entrez ertsuite un nombre entre et 1 destine a 
la generation aleatoire du relief. Vous etes alors au cap 0° , le 
Nord les directions etanl donnees suivant la rose des vents 
Mettez votre avion en marche et accelerez en appuyant sur les 
touches 7, 8 ou 9. 

Une fois atteint une Vitesse superieure a 75 km/h, decollez en 
appuyant sur le curseur du bas. Pour tourner. poussez le man- 
che dans la direction du virage, les positions intermediaires du 
curseur permettefit de combiner deux actions. Pour obtenir la 
carte (indispensable pour connaltre le relief survole) appuyez 
sur C. Exemple; apres avoir tape 298. 






K/ll 




^i^=^ 




90 







106 





145 







169 




o 1 




01 


257 


1 










380 


4 



7 L'avion pose / ralenfir puis stopper en appuyant sur 0. 
En atternssant sur les terrains d'aititude 0m, I avion arrete. 
plein se refait automatiquement 
Tableau de Bord: 



Le terrain esl divise en carres de 500 m de cote, chaque chiffre 
represents laltitude d'un carre Le chiffre encadre represente le 
carre survole par l'avion Voici la marche a suivre pour un atter- 
rissage en regie qui est la phase la plus delicate du vol. 

1 Trouver un bon terrain (quelques carres d altitude egale aii- 
gnes). 

2 Se meltre dans I'axe de la piste et entamer la descente pour 
arriver en debut de piste. 

3 A 4 ou 5 metres du sol, remettre lassiette a 0" avec la touche 
centraledu curseur. 

4 Amener sa Vitesse entre 75 et 85 km/h 

5 Cabrer l'avion (assiette >T ) et reduire les gaz pour obtenir 
une Vitesse entre 65 et 75 km/h. 

6 Tirer alors le manche. L'avion va descendre (attention la Vi- 
tesse de descente doit rester inferieure a 1 m/s au moment de 
I'attemssage). 



OAS 



OOn 



Alt:Allitude 
Sol:hauteur du sol 
V:Vitesse 
•:Avion pose 
0:Avion en vol 
As:Assiette 



X:Coordonnees 

YiCoordonnees 

Cap: Direction 

Vz:Vitesse verhcale 

(ctlnclinaison 

hNombre de litres restants 



Lassiette est Tangle que fait l'avion avec I horizontate. 
L'inchnaison est Tangle que font les aifes avec I'honzontale. 
Vitesse hmitee au sol: 97 Km/h 



? • tcll934 --- 

3 '- Pl.rr* BARTHE 
10 COSUE lOOOO 
13 CONS0LEO,4,O,O,l 
17 F0NT*I1311="4B,4 



20 CLS: CLEAR :P 



.460 F-F-1/U80-W2- 


2*R 


:t# 


F<OTHENF 


NT*CRASH ! ! 1 '-INEXTl 












ZOOS A-STICK(l) 


470 K=SQR(ABSI (V*V) 


/I7 


9ft 


Rftftl 


:o- 


2020 cls:print:print 


(90-B)/iao#Pi 












460 X=X+K*COSIHJ 










2030 AS-INKEr*:IFA«- 


470 Y=Y+K*SIN(B) 










I F A»= ■ □ ■ THEN! OELSE I F 


495 IFZ-H>»5THEPtSB( 












500 IFZ-H-0ANDVO0T 




f-0 






2035 F0RI-1TQ30:BEE 



S0ELSEB5E 



■■Mbre alea. 
I>=1THEN30 



520 IFZ=OANDU=0THENF=8 
I 530 IFZ-H<-2THEN2000ELSEIFZ- 

NZ-H: BEEP 100, 2JBEEP2O0, 10 

537 IFZ=HANDV>97THEN2000 
i 540 IFZ-M=OANDfi<-lTHEN2100 

550 IFZ-H=OANDS<01 



<<C/1B0*PI); 



1TH£NS-0!C=0:GOTOZ3 i 



G0SUB5O00 
BO AS-INKEY* 
IFSTRIGIDo 

I 0=STICK(O) 

1 H=100O0*IN 



iO LOCATE 3, l:PRINTUSING"t 
>0 IFA*'"C"THEN50SUB100O: t 
GO TOE 30 



J5DTHEN2300 



200 B=PI/4*IQ-I) 

210 C-C+S0NIFIXllO*5IN(G 

Z20 S=S-SGN(FIX<COSIO)*I 

230 I F F -o A N» V > 73THEN V- V - 

240 IFV>160THENWJ60 

230 IFV<OTHENV-0 

26D IFABSIC1 >65THENC«fiS* 

270 IFS<-9.5THENS— 9.5 



300 Q=S/648*PI»V 
310 IFV<?SANDS< 
320 IFV>750RV<i 
330 R—atB 



360 R=8 + D 

370 IFV<75ANDZ-H»OTHENR-0 

390 IFV>7STHENU-C«12/V 



I 660 LOCATE 3.3 

' 690 ifc-othenfrii 
npriwt^-ielsepr; 
700 printusing'hi 

77Q LOCATE 17,2 
760 PRINTUSING'HI 

790 ooToao 

1010 K-INTIX/G) 



1050 E=10000*tK< 
N+PIJE=1000*E*PI 
lOnO E=E-INTfE> 



2040 CLS:PRINT:PR1MT" BYE! BY 
r E I ! ■ :FORI-1T0700: NEXT: OFF 

2100 cls:beep2oo,3:beepiooo,12;pri 

nt atterrissage" 

2110 print" trop dur 1111*190703 

2200 cls:p»int"atterrissaqe sur-:p 

j RINT-LA RDULETTE DE NEZ!" 

2210 fori-ito20o:nexti 

2220 GOT 020 00 

2300 CLS:F>RINT° L'AILE -| 

2310 IFO0THENPRINT*DH0ITE"ELSEPRI 
NT "GAUCHE" 

2320 PRINT-A TOUCHE LE SOL HI- 
2330 FORI-1T0200JNEXT 
23 40 G0T020O0 
£ 2400 CLSf PRINT "DECHOCHAGE PRES BU" 
SPRINT- SOL MBOMMAQE...' 
2410 F0RI»0T0400:NEXT 
2420 GOT02000 
2500 CLSIPRINT- VOUS AVEZ HEURTE-: 

2510 F0RI-OTD300SNEXT 

2520 GDT02000 

0999 'INITIALISATION 



0140 F0RI-1TD60 
0150 IFINKEY«O"-THEN10 
■3*1, 1 :BEEP2*I , 2! BEEP4H 
0160 NEXT 

017O F0RI-26BTD310:BEEP 
EEP49.4 

1B0 CLSlPRINT- Vou 

1INT" la moQfi d'emplo 



) A«=INKEY«!IFA*-*-THEN101 
5EIFA»»"N"THENRETURNELSEIFA«< ! 
HEN10190 
.0195 CLS:C0NSOLE0,3 



1 CLS 



' !CHR»M 









5060 


RETURN 












iooio 


LOCATE 




PRI 


E 


E*H 


E-e* 


: LOCATE 9,1 


'S INI 


■DC 








PRINT 


■VOL" I 












1002C 


LINEK 


,291- 


111 








9,2B> 


LINE- 


0,2B) 


■LI 



9,251 ILINE-dl 
(0,25) 
FONT«( 240) -'0,0, 0,0, 172,236, 
2' 

>I=-1ANDL*J=-1THENE=0 ,816" 

>I=OANDL*J=-lTHENe=0 10050 PONT* 1242) ""0, 0, 0,0, 116, 84, 



=-1o:z=zih:beepioo,2:beep200 

P100.2 

430 IFT>OANDZ- 

440 B=B+W!IFB>360THENB: 

450 IFB<0THENB-B+36O 



THOMSON 



Suite de la page I 

EP 'G' ('SIMON, TAPER 'B' 

7 -■ * 1 

14075 A*=INKEY*:IF At< 

HEN 14B71 

140S6 IF HJ="G" THEN I 



i 5+5*1, 2- J 



£123, 151-155, 15): 
-123,23) JLINE-12: 

;-oto2oo:next 



), 0,0, 0,156,) 



B, 20, 20, 28° 

10090 FONT«1247)-'0,0,0,0,1 

I 10100 F0NT*(246l- n O, 0,0,0,3 



! FONTB1246)"'0,0,0,0,108,104, 



0335 A«-1NK6Y»:IFA*---THEN103: 
0340 CLSIPRINT- ...p«ll«r-:E 
lolcl la diapDaltiofl du TABLEAU 

0345 A*-INKEY*:IFA>a""THEN10345 
< CLS:PRINT'<Alt>:altltud*<m>' 
p>!c»p('(CHR«l2231 |")","<Vi>: 



0351 A»-INKEY«:IFA»»'-TI- 

0352 CLS:PRINTCHR«I132)J 
in vo!"ICHR«(133l I': 



0370 cls:prin 



la MODE D'EMPLOI' 



O2eo cls:print- Da 9m ( 
IPRINT'De Vitesse da dt 

75 fcm/h'J 
0285 A«-1NKEY»! IFA*- L -1 
029O CLS:f 



la.' 



i du i 



laa touches 1 -> 9*1 
0315 A*-1NKEY*:IFA*-" 
0320 CLS:PRINT'l->3 pc 
JPR1NT-6 urn obiaf IF 



0327 CLSIPRINT' *mr 
032S A*>INKEY>:IFA><°' 



110351 



□it» rapraaanta 1* *ual rai 

i A«-INKEY«!IFA«"*'THEN10403 
0410 CLS1PRINT- UTILISATION ",' 
la CARTE-,— ——"==*—"»=— 



0425 A«*INKEY*1 IF A«=-" THEN 10425 
i30 CLSlPRINT'La terrain eat di\ 
a en carrea da 500m de cote chj 



i*=" THEN 10433 
carte dpnne 1'J 



= INKEY«: IFAW-" 



i A«=INKEY«:IFA*="'THEN104S 
I CLSJPRINT'VOULEZ-VOUS REVOIR 
IS REGLES (O/N)' 
0465 A*=INKEY«:IFA«=-"THEN10465EL 
IFAS=-0"THENIO270ELSElFA«< > "H 



0470 RETURN 




I ELSE GOTOliee 



14090 RUM 

14200 CLS:fiTTRB 0,1 

14£yi FOF 1 = 1 TO ^:r.r.^AF:I:LO« T E: 17,1£:P 
P:| t |T"v H LUT":;.0_0^ 1-1 : lul-hTS: 3, ]£!PPIWT" 
J'ESPERE RENCONTRER VOTRE HONORABLE 
'■■KF-.;-.-'iMF_ TFE: eiENTijT p,;,.jp UHE UJIJUEllE 

PftRTIE DE GET HJMP.LE JEU '!F0R«=1 

T ::5>3:N£>:TK;;rPEi:''l !-;:-!£:■' iibOTD 14291 



^C'OC ' 



'H: 



E H ' 



!=ijLO SU'.F'. ij.ti --(■?'?, £i GftT- Sb>, 3:PLHV"D3 

C'O" 

i'Jij.'O f-i;ir 1=20 TO 6 STEP -2iB0K<I, !/£)-( 

T'?-I.l33-I £:'GPf36-]:HE-.-" I : FLfiV" HI - 

150S5 FOR [=Sfl to i :f-L:p-:iEi.r-- :..: ?■-■' 
9-r,£3-i ■■•£■' ne:=;ti:play"$0'' 

"l^Ci'C W> a, ?:■-■?■}. £3':-&R:$(36>,e 
i=.ii--;^ ":-:"T;3,ri,':jRf li . J: P"E T ■-.;.;.,-..■ CF-I ■ Z 
u -:P5.ETf3.29'GRJ^e->:P5.ETi36,£e:'GRS('36>: 
PLHY ,I 04DO" 

15ti4fi : = 3:CO = le0JLO = 170 

1=104^ P = 1^0 :FOR T = e TO 3.15 STEP .S5!C 
^.Ti + Ptr m';. T ■:L = L--:i-Pti:H'- T ■■ iLINECCO, LOi'-C 
[,Li,Z 

■ f-ii-i-i he;;t t 

■30-1? Z = T s C = i ifl:LO=170 

isri4:j P = 1S0 :FOP Li=.8£5 TO 3.155 5TEP .6 



■5:C = C0+R*crj£-'.-J ■ : L = l_--:i -Fi:*& I « c u ; : L I NE ^ CO, L ; 

>-(C,L>,i 

15&49 NEXT U 

15050 R=166 :FOR T=3.15 TO -.85 STEP -,E 
£5:C=':0+R*COSCT>!L=L0-R*SIN':T.-:LIME<Cl..L 
0>-(C,L>,-5 

15051 IF T<=£.4THEN flTTRB I.HCOLOR UU 
CATE IS, 12:PRINT"K" 

1505E IF T<=2.2THEN LOCATE 1 i, \2 : PP J NT "* 



15055 IF T<=1./THEN LOCATE IB, 12: PPIMT"T 

15056 IF K = 1.5 THEN LOCHTE 20, 18: PRINT" 
E" 

15057 IF T<=1.1THEN LOCATE £4, 1£: PPIMT"K 

1505S IF T<=.9 THEN LOCATE 26, 12:PRINT" I 

I5B59 IF T<=0.STHEN LOCATE 28, 12: PRINT"D 

L5066 NEXT T 

!5*-fi £u/:.-5.:^.>-'£J5.107),2 

1?075 FORI r = lT0-4! rfiS- : = & TO 7i COLOR I : L OC 

uTE 10, 12!PPINT'-KhRhTE UfHf 1 = 3 THEW 

I=5:L0CnTE iti.Hi«T-pe f. : PR; MT "PhB iUV 

'"C'RVrttt. .."SATTRB l-l 
15930 UEXT IrtiEJtUi 

150S£ PlA'. "K3i:4_I2:0PE*rHl;0SF^Pt(l[-:.0 7_«# 
04LJ0 s :'0L?50T--iS.;-iL^4, i;04!0Li'4PE#Ll£D0L 



240; 



A#L50SO* 

50S5 FOR 1=0 TO LG: CONSOLE. ■ 

24iPRINT!NEXTI 

50'?0 CONSOLE, ,.0 

5100 RETURN 

iitiyg- fl " ,p WNH=I TO :-fi:WE:.:T r.j r- 




INSTRUCTIONS COMPLEMEN- 
TAIRES SUR TO 7 CONCER- 
NArJT LE PROGRAMME 
GRAND PRlX DU N e 62 Bruno 
MERCIER a pens§ a ses 
confreres DOSistes et propose 
1 'adaptation suivante du pro- 
gramme Grand Prix. 



ClEhR50..41998,3 
FOP J=41999 TO 42759 

5 POKE! &Hft.70D. 1 

6 E:>;EC 41999 

..PEEKC42764/.. .PEEK(4276J>. . . 
. . c OKE 4S345.68 ELSE POKE 42345, 8? 
,.FOKE 42254, 6-HI ELSE POKE 42E54, • 
..POKE 42169,7 ELSE POKE 42109,3 
Remplacer S;H7F,6HF8 par S,Hft7,E.H6& 




S;H7E,4H9e 
&H7F,&H36 
&H7F,SHFE 
8:H7E,£.-H60 
S.H7F, 8.MFE 
&H7E.&H90 
S,H7T,&HFC 
&H7E.&H54 
. 4H7F.SHFD 
S,H7F,&HFr* 
iiH7E.4H4A 



&Hft5,&HA8 
&Hft5,&H46 
tHA7,SH0E 
&HA5,3.H70 
EHA7,S,H0E 
E.HA5, S.HA0 

&HlH7,S:H0C 

S.HA5,S=H64 
&HO7,i«H0D 
S:HA7.&H9D 
&HA5,&H5A 



BALL 



ZX81 



Emules de Mac ENROE et autres CONNORS, essayez BASIC. Ce programme comple 3K de langage machine et 3K de 

d'eqaler vos champions favoris en disputant des par- Basic. Tout d'abord. creez une ligne 1 REM de 3000 octets, puis 

tip*; ; arharnpp-e; rip ipnnk rnntrp vn« amk ,aDez le P e,il Programme qui vous permettra de rentrer un a un les 

lies acnarnees ae tennis COnue vos amis. ^ quelques 2980 codes macWs. un vrai plaisir. Supprimez ensuite 

Genevieve DEUX !es lignes 10 a 60 devertues inutiles et tapez le programme BASIC 

Mode d'emploi: Le match peut commencer. 
Les instructions necessaires sont irtciuses dans le programme 



A sulvre: 

En raison de la longueur in- 
habituelle du listing nous 
passerons ce programme 
en deux fois. 



10 FOR 1.16514 TO 19494 

23 input 3 

38 POKE I,H 
40 SCROLL 
se PRINT I.fi 
60 NEXT I 

42 12 64 14 24 532 35. 



244 42 12 64 35 17 114 

35 6 20 22 a 30 33 54 

a 26 16 251 S01 48 12 6* 

35 17 247 a 35 6 33 54 

9 35 16 251 201 6 

22 33 fl O 25 41 41 

41 41 41 85 9 213 £37 91 

IS 64 25 35 209 126 201 

e 32 33 O 26 

41 41 41 41 41 35 9 213 

337 91 12 64 35 36 209 11* 

£01 126 136 239 245 12 30 

12 22 12 129 30 1 1 

1 110 1 B 395 165 75 53 

IS 65 61 254 200 59 IS 

65 1B5 23 65 58 36 64 50 

6 65 5S 37 64 50 5 55 

55 5 65 254 157 2B3 130 65 

254 169 202 1S2 65 254 190 202 
174 65 254 191 202 195 65 254 

255 202 216 65 254 254 202 227 
55 354 253 203 236 55 354 251 
202 249 55 254 319 202 4 65 
254 221 203 15 66 254 322 202 
25 56 264 323 202 37 56 56 
5 65 354 345 203 48 65 254 

-- Is 



199 156 66 e 305 130 
64 63 50 196 64 50 197 
64 63 32 50 300 64 62 6 
50 202 64 205 191 64 63 33 
60 196 54 205 191 64 62 66 
50 196 64 62 10 50 302 64 
206 191 64 62 247 50 196 64 
62 2 50 197 64 63 9 50 
202 64 205 191 64 62 31 3a 
176 54 62 50 177 64 S3 
24 50 150 64 62 6 50 168 
54 305 171 64 62 114 50 176 
64 62 30 50 160 64 63 « 
50 165 64 205 171 64 205 156 
57 62 50 13 66 206 7 
66 62 16 50 13 66 205 7 
66 62 33 50 56 66 205 63 
66 62 49 50 56 66 205 52 
66 301 62 50 7 
S3 P 38 SB* 65 62 12 



> 9 65 



I 8 66 50 ; 



i aaa 59 65 198 97 t 



65 254 337 303 344 96 254 345 
202 244 66 354 249 203 344 66 
195 97 66 53 56 6 55 364 
335 202 196 66 254 243 303 196 



..-,, ._ -35 97 69 56 6 

55 254 264 202 136 66 198 97 

05 56 6 55 354 251 202 196 
66 195 97 56 56 6 55 254 
253 34)2 244 66 195 97 66 56 

6 65 254 253 203 219 66 195 
97 56 56 S 66 354 353 202 
319 66 195 97 66 53 6 65 



254 239 202 70 66 195 97 
do 56 5 65 254 239 304 72 
66 195 97 56 207 33 33 
30 43 124 161 32 251 237 75 

j"> 'a.!. i=S 255 >.SS ■::£ i'-'-V 6 
32 16 264 201 58 7 55 79 
55 8 65 95 62 126 205 234 
64 55 7 65 79 56 6 65 



i i . " 



133 206 234 64 55 9 65 79 
56 10 55 60 96 62 129 205 
334 64 56 9 55 79 66 10 
65 61 95 63 132 205 234 54 
301 42 12 64 
35 35 17 16 25 54 1S4 
35 54 170 35 54 165 35 36 
54 175 35 54 170 35 54 166 
35 35 54 154 35 54 163 35 
54 160 35 54 133 35 54 170 
201 ffl 42 13 64 35 35 17 
49 25 54 36 54 26 
35 54 e 36 35 64 35 
54 23 36 54 33 35 54 
35 54 26 35 54 28 35 
54 35 84 301 136 
00000000 

a 56 33 64 ea 3 65 59 

37 64 50 5 65 56 9 66 

354 137 303 177 66 354 169 202 

is! ss 2 a ii a i ii sty! a."' 

i 59 254 249 203 T 
. 70 a 99 
__ J34 237 282 199 61 __ . 
245 202 135 69 254 349 292 244 
69 195 14 70 56 6 65 364 
237 303 195 69 264 246 302 135 
69 284 249 303 344 69 195 14 
78 59 6 65 354 235 203 
196 59 354 343 302 135 89 354 
351 302 344 59 196 14 70 
58 6 55 364 238 202 195 69 
254 239 202 196 69 254 246 202 
136 69 254 £47 202 136 69 254 

250 r 



14 70 205 90 t- -. 

61 50 9 65 195 154 69 

55 10 65 254 4 202 14 70 
205 90 69 53 9 55 79 58 
ie 65 51 50 10 65 195 158 
59 56 10 65 354 21 202 
14 70 205 90 69 56 9 65 
79 58 10 55 60 50 10 65 
195 158 69 56 14 65 254 
302 315 73 58 11 

65 234 202 222 71 354 30 
202 223 71 254 15 210 164 70 

56 11 65 79 58 12 65 60 

95 205 206 64 254 9 304 106 
70 56 11 65 79 63 13 68 
61 95 305 206 64 254 10 304 
106 70 56 11 65 61 79 56 
i,2 65 95 205 203 64 854 7 
02 125 70 2S4 5 202 138 70 



2 50 21 65 301 62 1 60 
31 65 201 63 50 20 65 



_. 71 82 4 „ 
65 63 2 50 31 65 195 14 
71 56 11 65 79 53 12 
65 50 95 205 208 54 254 9 



71 56 11 65 79 53 12 

65 50 95 205 208 E' 

204 106 70 56 11 6. ., ... 

12 65 61 98 308 £06 64 284 

10 204 106 70 53 11 65 50 

79 56 IS 65 95 205 308 64 

254 132 202 328 70 354 133 303 

342 70 £54 129 202 355 70 195 

14 71 62 2 50 31 65 63 

' "n 20 65 195 1* 71 



S£ t 



i_av f 



ea : 



65 195 14 71 62 I 

"-> 50 20 65 195 : 

I 205 139 71 ! 



21 65 80 20 65 ! 

205 139 . - ... 

30 68 384 1 Sea 106 71 86 



21 55 364 30S 62 . _ . 
I 203 32 71 58 11 55 50 
11 66 79 58 12 65 61 



364 



tl« 1HHI HUB SJ4 6* 

53 31 65 284 801 

254 1 202 144 71 1 

61 30 11 65 7B SB 

60 5« 12 65 95 62 



> 95 63 : 



! 205"234 64 66 



7 65 79 53 8 65 61 95 

62 138 £05 234 64 301 86 7 

65 254 302 97 53 205 94 

66 68 7 66 61 SB 7 65 
79 56 8 85 95 62 5 205 
234 64 56 7 65 79 58 8 

-~ 130 205 234 64 
• at 95 56 7 65 
' 205 234 64 195 97 



219 202 218 69 i 



65 60 96 i 



.... 195 1 

; as* 13 sas 

"6S"?9 195 1SB 86 



__t £21 202 216 

39 254 233 382 316 69 195 14 
78 3 58 5 65 254 323 202 
218 69 198 14 7a 56 5 55 

. .rk 202 SIS 69 195 76 39 
68 5 65 254 239 303 70 65 
195 14 70 a S3 5 55 354 
339 234 72 66 195 14 70 
58 9 55 79 55 10 65 95 
63 125 205 234 64 56 9 65 

■:■■■; ■-:■■., jo ■■:-* =■: -i? :,.■■. .■:;■ 

205 334 64 58 9 65 79 53 
10 65 61 95 62 123 305 234 



1 58 8 65 354 i 



69 ! 



i 65 60 50 3 65 



65 60 95 62 139 305 234 84 
5S 9 65 79 56 10 65 61 
95 62 133 205 334 64 195 14 
70 58 9 55 354 17 202 



50 12 65 95 62 150 205 334 

64 19S 319 71 58 11 65 60 
50 11 56 79 58 12 56 98 

ea iaa 205 234 64 195 219 71 

58 11 85 60 50 11 65 79 
56 13 85 60 50 IS 65 96 

• B " ~05 334 64 ISS 81? 71 

~- a 808 168 7i 
71 53 11 96 

60 50 12 65 95 63 160 805 
234 64 T.95 219 71 53 11 

65 61 50 11 65 79 58 12 
55 61 50 12 65 95 62 160 
£08 334 64 IBS 219 71 SB 11 

66 61 50 11 65 79 58 13 

65 95 82 180 306 334 64 195 
319 71 a 58 11 65 254 15 
282 208 71 79 58 12 65 95 
62 123 205 234 64 201 79 58 
12 65 95 62 205 234 64 
301 195 315 73 56 11 65 254 
303 318 73 385 28 73 14 
39 30 1 806 308 94 354 33 
288 23 73 14 39 30 1 286 
CSS i;..l. a:j:!. 5Z: 1-z* £::i3 7i .U 

10 30 1 885 £08 64 254 33 
203 64 72 254 38 203 138 73 
354 29 283 148 73 195 153 78 

8 14 39 30 1 63 

205 234 64 196 106 73 14 10 
30 1 305 303 64 854 33 194 

1 72 14 13 30 1 63 36 

303 334 84 195 106 73 14 6 
30 1 305 208 64 354 33 283 
33 7fi 60 SO i5 a *| 1* 8 
1QS"134 73 S 14 ft 
30 1 305 308 84 354 39 303 
806 73 14 3 30 1 62 29 
205 £34 64 195 7 73 14 10 
30 1 63 89 205 S34 84 14 

11 30 1 62 33 308 334 64 



63 31 205 234 64 14 11 30 

I 62 28 205 334 64 195 108 

73 1* 10 30 1 68 as sag 
334 64 14 11 30 1 63 88 
205 834 64 195 106 73 14 18 
30 1 68 38 305 234 64 14 

II 38 1 82 28 805 834 64 

14 13 30 1 62 205 234 

64 14 2S 30 1 63 26 805 
834 64 14 87 30 1 63 38 

205 £34 34 14 39 30 1 63 

305 S34 64 58 18 65 364 
8 40 8 63 8 50 16 65 

195 186 73 68 1 60 16 65 
195 106 73 8 14 5 38 

1 63 S3 385 234 64 14 38 
30 1 62 36 305 834 64 195 
1S4 73 14 14 30 18 68 52 

206 234 64 14 15 30 12 53 
SB 205 234 64 14 16 30 13 

62 67 305 234 64 33 150 
43 134 161 32 261 14 14 30 

15 62 128 206 £34 64 14 15 
38 13 62 205 234 64 14 

16 38 12 62 188 385 234 64 
56 11 55 79 83 12 66 95 

63 138 205 234 54 201 
206 197 73 58 16 65 254 8 
302 134 73 62 1 58 20 85 
14 2S 30 12 62 180 305 234 
34 195 347 73 62 58 20 

65 14 2 30 13 63 130 195 
4 74 53 83 64 254 170 318 
178 73 354 85 810 176 73 68 

50 21 35 195 165 73 
62 1 38 81 85 195 163 73 
68 2 58 81 85 19S 163 73 

68 1 88 14 65 80S 78 68 

195 313 73 805 94 53 205 90 

69 305 156 37 88 1 50 17 
65 301 195 30 74 33 3 

43 124 161 32 851 35 14 65 
£54 £03 339 73 32 50 
14 35 195 310 75 63 1 50 
14 65 195 210 75 63 £S 50 
11 65 68 13 50 13 65 195 
143 73 S05 334 64 63 8 30 
11 65 63 13 50 IS 66 195 
143 73 305 S3 73 14 13 30„ 

1 305 308 84 864 38 388 72 

74 14 10 38 1 805 308 54 
364 32 368 845 74 14 26 I 
1 289 306 f ' 



34 14 64 63 49 167 83 £3 

33 82 303 18 95 33 

36 85 14 8 8 8 34 123 

64 86 178 803 34 23 43 14 
64 119 35 34 14 84 16 £42 

17 26 43 14 64 23 34 

' '. 54 48 183 64 35 13 32 



1 16S 75 ! 



. 63 39 50 04 



75 303 36 79 68 38 |_ — 
75 S05 93 75 62 49 58 94 
75 205 93 75 205 93 75 201 
53 7 55 79 56 8 85 95 
62 6 286 234 64 58 7 66 
79 56 8 65 61 95 63 7 
205 234 64 59 7 86 79 58 
- " ! 69 95 63 130 £06 234 



58 10 65 80 1 



A suivre. 



) 64 854 33 383 108 



74 254 SB 80S 161 74 £84 SS 
202 183 74 195 803 74 14 13 
30 1 63 385 £34 64 195 



64 254 33 S 



. ! 137 74 60 50 

is os j.4 32 30 1 53 15 

65 205 234 64 195 184 73 14 

18 38 1 205 308 84 354 89 



202 224 ' 



14 IS 38 : 



98 



29 205 234 64 195 7 73 14 



26 30 1 63 29 i 



i 234 64 



_J 27 30 1 62 33 S06 i 

64 195 106 73 14 26 38 1 
53 31 205 834 64 14 37 30 

I 62 38 805 334 54 195 106 
73 14 36 30 1 62 32 305 
234 64 14 37 30 1 52 33 
305 334 84 195 106 73 62 2 
50 17 65 301 14 13 30 1 
305 308 64 254 36 194 48 73 
195 64 72 14 39 30 1 285 
308 64 354 38 194 34 74 195 
108 74 205 16 67 63 1 58 

14 65 58 53 64 354 127 310 

oe 75 as a sa n SB 62 

13 SO IS 65 63 60 18 

65 !50 23 65 58 21 65 58 

II 65 79 58 IE 65 96 63 

180 205 234 64 286 73 66 195 
38 65 5S SB 50 11 55 63 
12 50 13 63 62 1 50 16 



65 50 30 { 



62 50 31 



65 195 41 76 48 13 64 ; 



CflRfiCfl 



m 

3035, i 
2040.. 
2045. , 
3090.. 
3855 . . 
8880 . . 
3055 . . 
3870 . . 
2880 . . 

3895., 
3890. , 

2898. i 

2180. , 
2118. i 
2160. . 



CARRCTERE3 I 



, "BNTft|Z UN NQMBRE ENTRE : 

, 'POUR EN9RQER PRESSEZ UNE 

TOUCME" 
. ■POUR RETOURNER RU BASIC, 

fiPPUYER" 
.'■SUR (8) ET 18)." 
."POUR PAUSE. PRE5SER (f 



"LE fIRTCH 8E D2RQULE EN 3 

SET " 
"0R0NRNTS.LE8 COMPTEURS 1 

"NENT m COMPTE DES RURNTBOI 

,, LES ii 3I0NRLENT PRR UN (fll 

"COTE DU SCORE. NEP.NMOINB 

"TIENT PAS COHPTE DES 2 . 

"5 ECRRT POUR QBTENIR LE 

"LES'RfiQUETTES SONT COMPO 

"^Eement^Ientrrl mnu 

'LR C BRLL6 HORIZONTRLEtieNT 



"- LE HRUT YERS LE BBS" 
- - LE 0R3 UCR3 LC HRUT" 
■'COnnnNDES 6E LS RftOUETTE 
"DE OAUCME: CE DROITE:' 

UERS LG HRUT 



EN RRRICRE 



JEUX 

DES INVERSES 



Des cubes, encore des cubes, toujours des cubes, 
pour reconstituer un encore carre. 

Julien CLAVEZ 



Tl 99 BASIC ETENDU 




QnEn 



15 REM 


CALVE Z JULIEN 


20 REM 




25 REM t. 


AV. JOSEPH BEDIER 


30 REM 




35 REM 


75013 PARIS 


40 REM 




45 REM 


TI-77/4A 


50 REM 




55 REM 


BASIC ETENDU 


6,0 REM 




£5 REM 




100 CALL CLEAR 


105 PRINT 


J£U DES INVERSES" 


110 PRINT 




115 PRINT 




120 PRINT 


LE JEU CCMPREND 9 CASES 


125 PRINT 




130 PRINT 


'■CDRRESPONDANT A 9 TOUCHES DU 


1?5 PRINT 




140 PRINT 


"CLAVIER. Q m E" 


145 PRINT 




150 PRINT 


AS D" 


155 PRINT 




160 PRINT 


Z X E" 


165 PRINT 




170 PRINT 




175 PRINT 




1BO INPUT 


ENTER ..." 


L* 




IBS PRINT 




Itt) CALL CLEAR 


195 PRINT 


LES CASES PEUVENT ETRE 






205 PRINT 


"" "ALLUMEES"" DU ""ETEINTES"" 


210 PRINT 




21S PRINT 


"VOUS DEVEZ "■ , ALLUMER*■'■ TQUTE 


220 PRINT 





250 PRINT 



2i0 PRINT 



2B5 PRINT 



295 PRINT 



LES CASE5IC0ULEUR BLEU)." 

POUR CELA.VOUS POUVEZ" 
APPUVER SUR UNE TOUCHE " 

- DE COIN,PDUR INVERSER " 
4 CASES DE COIN, " 

- DE CDTE,POUR INVERSER " 
3 CASES DE COTE. " 

- DE CENTRE, POUR TNVERSER " 

TOUTES LES CASES." 

ENTER .. . ": 



5 FOR 1-0 TD ; 



OFF I CH AGE 



315 CALL CLEAR 
320 DIM A(2,2) 

330 CALL CHARdOfl, "FFFFFFFFFFFFFFFF") 

335 CALL C0L0R(9,6,1) 

340 CALL CGLOR<10,9,1) 

345 CALL SCREEN(ll) 

350 FI="QWEASDZXC" 

355 REM T I RAGE DU DEPART 

3faO REM 

365 RANDOMIZE 

370 FOR 1=0 TO 2 :: FOR I1~0 TO 2 

375 All, I1)=INT(RND*2) 

3B0 NEXT II :: NEXT I 

3B5 C1=0 

390 REM DEBUT DU JEU 

595 REM 

400 GOSUB 450 

405 IF C3=0 THEN GOTO 710 

410 DISPLAY AT(20.1):"A VOUS I" 

415 CALL )EV(O f K,S)i: IF 5=0 THEN 415 

420 CALL SOUND (100, 660,21 

425 CALL SOUNDUOO. 770,2) 











655 FOR 


1-0 TD 2 


470 FOR 1=0 TO 2 : : FOR 11=0 TD 2 


660 A<X-, 


H-+=(*-iX,Ilf-0) 




665 NEXT 


11 


TO 490 


670 RETURN 


480 B*(I, Il)="h" 


67S REM 




4B5 C3-C3+1 


6B0 REM 


CENTRE 


490 NEXT 11 : : NEXT I 


6B5 REM 




495 FOR 1=0 TO 2 I! FOR 11-0 TO 2 


690 FOR 


=0 TO 2 it FOR Ii'0 T 


500 DISPLAY AT<5+tI#4>,iO+tIl*4))BIZE<l) 


695 ft (I, 


l)-(A(I,II)-0> 


IBS (.1,11) 


700 NEXT 


11 I i NEXT I 


505 NEXT Hi: NEXT I 


705 RETU 




510 RETURN 


710 REM 




515 REM 


715 REM 


GAGNE 


520 REM COMMANDE 






525 REM 


725 CALL 


SOUNDUOO, 440,2) 


530 C2=0 


730 CALL 


SOUNDUOO, 550, 2) 








540 IF R*°5EG*IFS, I , 1 ) THEN C2-I :: I=LEN 


740 CALL 


SOUNDUOO, 660, 2) 






SOUNDUOO. 880,21 






550 IF C2=0 THEN Cl-Cl-1 :t GCTD 570 










560 Y=INT(C2-1)-X*3 






565 ON C2 B05UB 575,615,575,615,675,615, 




575,615,575 


765 IF X»="N" THEN GOTO 780 




770 CALL 


CLEAR 














5B5 REM 


7SS PRINT " AU REVOIR ..." 


S90 D=X/2 a Dl-Y/2 


790 PRINT i : : : i : ! : ! 


595 FOR 1=0 TO 1 :: FOR 11=0 TD 1 


795 END 





BALL TRAP 



Payez-vous le luxe de disputer une partie acharnee de 
"Ball Trap" bien au chaud grace a votre Tl. 



Xavier LERISTRE 



JS^\ 



TI99 BASIC 



ETENDU 




AO REM * BALL FRAP * 

,20 REM * AIJTLUR * 

.30 REM * LEWSTRE" * 

140 REM * XAVIER * 



"GAME OVER" 



570 DISPLAY AT<: 
5B0 MEXT I 
590 GOTO 16B0 
600 CALL SOUND 1- 
£10 CALL C0I1MCN 



19$ REM JEU 

200 CALL SCREEN<2) 

210 CALL CHARI96. "OC 

''■■jOi.i'..K.ir,oo:''-."jij , .'i00ooo':':iv xA'Cooocooooooojoo 



230 CALL CHAR (91. "00ia3C3C3C7E") 

210 CALL CHAR(108."OB02400Ca90220u501901 

424 0O1O400254602209BOAOOO9OS10O44O022BOO 

800" ) 

250 FOR 1=3 TO 12 

260 CALL C0LOR(I.16.B> 

270 NEXT I 

280 RANDOMIZE 

MS B=INT(RND*6>-3 

300 CALL SPRITE (#1. 96. 9. 100.1251 

310 CALL SPRITE(#2. 100.2. 180. 125) 

320 CALL HCHARfl. 14.91.5) 

330 IF E=0 THEN 3B0 

340 DISPLAY AT(2.3):"SCaRE":R 

350 CALL KEYll.K.SJ:: IF-KofB THEN 350 

360 E=0 

370 DISPLAY AT(2.3):"SC0RE"ift 

3B0 0=5 

390 CALL M0TION(#2.-14.6*B> ■ 

4O0 CALL JOYST(l.X.Y) 

410 CALL M0TION<#l.-Y*7.X*7> 

420 CALL KEY(l.K.S):: IF K^ie THEN 600 

430 IF P>20 THEN. 520 

440 CALL P0SITION<#2.A.B) 

450 IF A<10 OR A>240 THEN 470 ELSE 460 

460 IF B-.30 DR B>240 THEN 470 ELSE 400 

470 DISPLAY AT<2.3): '5CORE:"lR 

4B0 P=R*1 

490 CALL DEL5PRITE<#2.«1) 

500 IF P>20 THEN 520 

510 GOTO 290 

520 CALL DELSPRITE(ALL) 

530 CALL CLEAR 



620 CALL PATTERN(ft2. 108) 
630 R=R+1 ! ! P=P+1 
640 CALL DEL5PRITEt#2.m> 
650 DISPLAY ATI2.3) : "SCDRE:"iR 
660 GOTO 290 
670 Q=Q-1 

680 CALL HCHAR(1,1B-E.32) 
690 IF Q=0 THEN 470 
700 GOTO 440 
710 REM DECDRS 
720 CALL CLEAR 
730 CALL SCREENI2) 
740 CALL COLOR (1.13, B) 
750 CALL CHAR(33. , '000BlB3e3C7EFFFF") 
760 CALL CHAR(34. , '000000OOlO3C7CFF") 
770 CALL CHAR135. "00000020303B7CFF" > 
7B0 CALL CHARI36. "00000000040E7FFF" ) 
790 FOR 1=1 TO 32 STEP 4 
BOO FOR J-l TO 4 
BIO CALL HCHAR112, I+J-1.32+J) 
820 NEXT J 
B30 NEXT I 

840 CALL CHAR(37."FFFFFFFFFFFFFFFF"> 
B50 CALL HCHARI13. 1.37.32) 
860 CALL HCHARU4. 1,37,32) 
i CALL COL0RI2.5.3) 



1 PRESENTATION 
1040 CALL CLEAR 
1050 L0=300 
1060 CALL SCREENI21 
1070 CALL CHAR(33. , '00000O3L.'L/r "COOOOOOO 

oooooooooooooooooooooooooooooooooooooooo 

1080 CALL CHAR(36. "000000000000000000804 
O 20100aOS0700000'."jOOoOOOO':'OOCi 00000 0O0OO1 
OEO" ) 
1O90 CALL EH«R<4C. ,, 0OO000000'XiOO001O6F8O 

oooooo':-0!''OOOOijOJOKii-a'ioEr..ooooo(.'00oooo':iO'> 



1400 FOR 1=1 TO 10 

1410 READ A.B.C 

1420 CALL SDUND<A,B.O.C.O> 

1430 NEXT I 

1440 ACCEPT AT<20.27)VALIDATEC'ND' , ):RES 

1450 IF RE»="N*' THEN 1600 ELSE 1470 

1460 REM REGLE . 

1470 CALL CLEAR 

1480 DISF'LAY flT(l.i) 1 "LB JEU C0N5ISTE A 






:UIRE" 



I SPLAY I 



000 " . 



) CALL CHARM 



" 00000000090 200050 1*00 



BSO CALL CHAR 

890 CALL CHAR 

900 CALL CHAR 

910 CALL CHAR 

920 CALL CHAR 

930 FOR 1-15 TO 24 

940 CALL HCHARU.1,44.; 

950 NEXT I 

960 FOR 1=1 TO 4 

970 CALL HCHARU6. 13+1. 

980 CALL HCHARI19.6+I.: 

990 CALL HCHARI23.24+I. 

1000 CALL HCHARU6.26+J 

1020 GOTO iao 



40. "073F7FFF7F0703") 
41. "BOCOESFFFFFFDFoa"} 
42 . " I 03CFEFFFFFFC706" I 
43. "003a78FCFBFBCOOO' , l 



00") 

1110 CALL CHARI4E. '■■jtiO24.;.„K'ti''022C'05iJl9,ii 

424Crul040025.1a-J2209g0A!:'009!;.raK!'.i4400:'2G-J!;: 

300-) 

120 CALL MAGNIFY13) 

130 FOR 1=1 TO 14 

140 CALL COLOR! 1.9. 1) 

150 NEXT I 

160 AS="8ALL TRAP" 

170 FOR J=l TO 9 

180 CALL SPRITEIKI.36,7.90.176) 

190 CALL 5PRITEIK2. 33,16. 83. 182) 

200 FDR 1=1 TO 20 :: NEXT I 

210 CALL t1DTI0N<#2. 0.-20! 

220 CALL PATTERN f#i, 40) 

230 FOR 1=1 TO LD 

250 L0=LD-25 

260 CALL MDTION(#2.0.0) 

270 CALL SOUND (-400. -7.0> 

280 CALL PATTERNf#2.44) 

290 FOR 1*1 TO 20 

300 NEXT I . 

CALL PATTERN(t*2.4B> 



POSEZ" 

1510 DI5PLAY AT 

5 BALLES" 

1520 DISPLAY AT 

LIES EST" 

1530 DISPLAY AT 

PERDEZ" 
1540 DISPLAY AT 
1550 DISPLAY AT 
1560 DISPLAY AT 



1570 DISPLAY AT (24.3) : "FOUR CDMI 

1580 CALL KEY<5.K.S):; IF S=0 T\ 

1590 IF KOI3 THEN 1580 

1600 CALL CLEAR 

1610 DISPLAY AT112.B): "RELEVEZ I 



:3.3):"LE MAXIMUM DE DISQ 
:5,3):"P0UR CELA VOUS DIS 
:7,3):"D UN VIBEUR ET DE 
10.3>:"LE NOMBRE DE DISQ 
:i2.3)!"LIMITE ALORS N EN 



■PAS DE TROP" 
'BONNE CHANCE " 
'APPUYEZ SUR 'ENTE 



14.3); 
18,3)1 



TO 200 :: NEXT I 
'O 

; CALL COLDRII. 
: NEXT I 
1650 DISPLAY AT(12.3):"A CDMBIEN . 



1620 FOR 1= 

1630 GOTO 170 

1640 FOR 1=1 TO 8 : 



320 FOR I 



350 CALL I 



TO ! 



0,200.350,700,200.330,660 

1670 DATA 200,295,590,1000.295.590 

16B0 CALL CLEAR 



:i2,10+J.ASC(SEG.U 



• CALL CHARSET 



1700 DISPLAY I 



! FOR 1=1 1 

NEXT I 

0) :" SCORE": 



360 NEXT J 

370 CALL DELSPRITEd 

3B0 DISPLAY AT (20. 3 

eeuEs ■?- 

1390 RESTORE 1660 



"VOULEZ VOUS LE5 f 



1730 DISPLAY ATC 
1740 DISPLAY AT< 
1750 ACCEPT ATU' 
1760 IF ONS= 



).6):"REJ0UEZ V0U5 " J " 
,21) VAL I DATE ( " ON " > : ON^ 
END ELSE 1 



LE CA VALIER 



C'est fou ca. C'est pas drole une vie de cheval. Etre 
oblige de parcourir tout I'echiquier et encore pas n'im- 
porte comment, tout ca pour avoir droit au picotin, non 
c'est pas une vie ga. 

Daniel BIENFAIT 




BIENFAIT DANIEL 
PSM : LE CAVALIER (3202 OC) 
ORD- : TRS-80 MOD.l NIV.2 



99 

* PRESENT. ET DESSIN PLAN DE JEU * 

********************************* * 
100 CLS:CLEAR200:DIMA<H,11),A*(11, 11) :SC=1 
103 PRINTCHR*(23)a220, "J E U"33?4,"D U CAVALIER 
RING*(32,42> sFQRI=lTO500:NEXT 

109 FORJ=0TO1UFORI=0TO11:AU, J) = l : NEXT I, J:CLS 

110 FORJ=2TO9:FORI=2TO9:AU,J)=0:PRINT37*(I-2)+129*(J~2) 
6)+CHR*(132);:NEXTI,J 

112 FORP=0TO15:PRINT352+64*P,CHR*< 191 ) ; :NEXT 
115 PRINTa54,CHR*(92>" J A .. H" ;31 IB, CHR*( 94) " : 1 .. 8 
DEPART :" ;3632, "MVTS :"; 

117 PRINTa696,"I 2";a757,"B " i CHR$ ( 176) ;CHR* U31 ) ; CHRS 
" 5CHR*(191);CHR*(131);CHR*(176> i" 3" 5 3823, STRING* (7, 179) 
R*(191) ;3S95, "7 ";CHR*tl31)iCHR*( 176) ;CHR*(191 ) i° ";CHR*< 
Rt(176) ;CHR*(131); - 4" ;3952, "6 5" ; 

120 PRINT3311, "QUELLE-^PRINTaS??, "CASE ?" i : PRINTa24S, " 
129 ' «***#***#***,#* 
* DEPART JEU * 



200 
210 
220 
230 
,A»( 
239 



191);° 

3B26, CH 
191) iCH 



A*=INKEY*!IFA*= U 'M30ELSEPRINT324B,A*5 

B*=INKEY*:IFB»="",140ELSEPRINTa250,E*; 

IFA*>="A"ANDA*<="H", 170 

IFA*>="1"ANDA*<="8", 190ELSE120 

IFBl6>="A , 'ANDB*<="H' , ,120 

IFB*>=" 1"ANDB*<="B",210ELSE120 

IFB*>=-A"ANDB*<= ,, H i, ,220 

IFB*>=" 1 U ANDB*<="B", 120ELSE120 

I=ASC(At)-i3;J=VAL(B*)+i:GOTO230 

J=VAL < A* ) +1 : 1 =ASC ( B* ) -63 

A*(I, J)=CHR*<191)+CHR*tl79) :A( I , J)=l :PRINTa7*( J-2) +128*( 1-2) 

I,J)i !A=I:B=J:At(A,B)=CHR*(156)4-CHRt( 167) 

* JEU (TEST MVT POSS. OU NON) * 



:PRINT3502, 



STRINQ*(10,32) J 

255 PRINTa7#(B-2)-M2B*<A-2),A«(A,B) » 

260 ONVAH A* )GOTO270, 271, 272, 273, 274, 275*276, 277 

265 GOTO240 

270 IFAd-2, J-l) = l,2B0ELSEJ=J-lsI = I-2!GOTO290 

271 IFA(I-2, J+l)=l,2B0ELSEJ=J+l:I=I-2=GOTO290 

272 I FA ( I - 1 , J+2 ) = 1 , 280ELsE J= J+2 : 1=1-1 i GOTO290 

273 IFACI+1, J+2 )=l,2B0ELSEJ=J+2: 1=1+1 :GOTO290 

274 IFA(I+2, J+l)=l,2B0ELSEJ=J+l:I=I+2:GOTO290 

275 IFA(I+2, J-l)=l,2B0ELSEJ=J-l:I=I+2!GOTO29B 

276 IFA(I+1, J-2 )=l,2B0ELSEJ=J-2: 1=1+1 :GOTO290 

277 IFA(I-1, J-2 )=l,2B0ELSEJ=J-2: 1=1-1 :GOTO290 

280 PRINTa439,°MVT NO ' !A«) I PRINTa502, " IMPOSSIBLE" i :MI=1 

290 IFMI=0,SC-SC+l:PRINTa566, "SCORE:" ; : PRINT3572, SC;ELSEMI=0 

295 PRINT31014, "POS. : " }CHR*( 1+63) ? J-l \ 

300 IF3C=64,PRINTa7*(J-2)+12e*<I-2),CHR*(i56)+CHR«(167);!GOTO390 

310 IFA(I-1,J-2)«1,320ELSEQOTO230 

320 I FA ( 1+ 1 , J-2 ) - 1 , 330ELSEGOTO230 

330 IFA(I+2, J-1)=1,340ELSEGOTO230 

340 .IFAd+2, J+1) = 1,350ELSEGOTO230 

350 I FA < I + 1 , J+2 ) = 1 , 360ELSEGOTO23B 

360 IFA(I-1,J+2)=1,370ELSEGOTO230 

370 IFAt 1-2, J+1)=1,3B0ELSEGOTO230 

3B0 I FA ( I -2, J- 1 ) = 1 , 3B5ELSEGOTO230 

385 Q=l 

389 ' *************************** 

* COMMENTAIRES FIN DE JEU * 
*************************** 

390 PRINT37MJ-2) + 12B*< 1-2) , CHR*( 156)+CHRt ( 167) ; : PRINTS440, "FIN 
DU" i :PRINTa50A, "JEU" i :FORO=1TO20»OUT255,41OUT255,0!NEXT 

500 FORI=1TO3000!IFINKEV*<>" ",NEXT 

510 CLS:PRINTCHRt(23) :IFQ=1,550 

520 PRINT3210, "BRAVO, " :PRINT3320, "VOTRE NOM VA ENTRER DANS 

L'HISTOIRE, " 
530 PRINT344B, "AU COTE DE MATHEMATICIEN5 CELEBRES COMME i" 
!PRINTa584, "EULER (1759) COLLINI (1773) ET WARNSDORF (1B23). 

540 PRINT376B, "TAPEZ LA TOUCHE ' R' POUR TENTER DE RENOUVELER VOT 

RE EXPLOIT" :GOTO590 

550 PRINTa3B4, u CE SCORE DE"SC"EST A AMELIORER" SPRINT 

560 IFSC<40,PRINT"VOUS DEVRIEZ REFLECHIR UN PEU PLUS" 

570 IFSO50, PRINT-ENCORE UN PETIT EFFORT" 

5B0 PRINT376B, "'R' POUR RECOMMENCER" 

590 IFINKEY*O"R",590ELSERUN • 



LE LOGICIEL DE LA 
SEMAINE 



SPELUNKER DE BRODERBUND 
POURCBM64 



Cette nuit, j'al vecu une 
communication aslrale avBc le 
fantome de Micha d'une mien- 
site sans egale. Visiblement la 
reincarnation le guette, il ne 
pourra plus assumer sa part 
cin dialogue dans Miche at 
Mlcha. Triste fin pour un bien 
triste sire. Mais ne nous appi- 
toyons pas plus longtemps sur 
le sort des autres et atta- 
chons-nous a decrypter les 
mysteres mysterieux du sus- 
dii logiciel Spelunker. 

Comma par un hasard mal in- 
tentionne, vous etes dans la 
mouise la plus protonde: perdu 
au fin fond d'une galerie sans 
fond, voire moral est au plus 
bas. Que dire de votre etat ge- 
neral lorsque vous vous aper- 
cevez que I'ascenseur dans le- 
qusl vous venez de prendre 
place n'est en fait qu'un des- 
censeur subtilement deguise 7 
II est deplorable Bon tout 
n'est pas dit ! Apres avoir ab- 
sorbe votre dose habituelle de 
remontants divers, vous vous 
decidez a franchir le pas qui 
vous menera dans les limbes, 
ou tout a cdte dans le meilleur 
des cas. Votre soif inextingui- 
ble de richesses reprend petit 
a petit le dessus et vous vous 
preciprlez sur le magnifique 
vase precolombien que vous 
venez de voir au detour d'une 
levee de terre. Pas plus de 
vingt huit metres cinquante 
sept plus loin, vous trouvez un 
baton de dynamite qui vous re- 
monte le courage au-dessus 
du niveau de la mer. Joie, 
exultation, profonde surprise 
et regain d'energie vous tom- 



bez inopinement en arret de- 
vant une magnifique pile Ni- 
ckel-Cadmium qui vous permet 
de recharger a bloc voire stock 
de vibratiles (arme a nulle 
autre pareille dans les 
combats msenses contre les 
morts-vivants du cru) Point ne 
suffit d'en resler la ! Votre for- 
tune est faite II suffit de se 
baisser pour ramasser les pe- 
piles, les objets d'arl et autres 
seaux en ptatine chrome. Fina- 
lement, la claustrauphobie 
vous quitte el vous decidez de 
franchir le test final, vous re- 
prenez place a bord du des- 
censeur et gagnez les galeries 
inferieures (en altitude mais 
pas en dangers divers, comme 



vous vous en rendez compte 
au bout de quelques pas) 
Bien des risques que vous ac- 
ceptez de prendre vous per- 
metfent d'augmenler votre pe- 
cule a la vitesse de rhirondelle 
africalne porteuse de noix de 
coco Bonne aventure en un 
mot. Dommage quelle ne 
s'echelonne que sur six re- 
seaux soulerrains (a raison 
d'une demi-heure par reseau, 
ca va encore). Vous pouvez 
I'acheter en toute confiance, il 
ne deshonnorera pas votre lo- 
githeque. 

Frere BUND 

et 

Band BBODER 




LESAVENTURESDEFINITIVESQUES m&THJ 
DE MICHE ET MICHA 



SBROTOGEZNEU pour MAMBA 21 
etPROUTE13GT7 



- Alors, Micha, c'est la der- 
nlere fois que |e dls "Alors 
Mlcha" ? 

- Yeah ! C'est la fin finale 
dans deux minutes, j'enleve le 
haul. 

- C'est vrai que tu te balades 
presque a poii depuis... Au 
fait, on fait un bilan de nos 
aveniurss passees ? 

- Non. Ne tournons pas la 
plaie autour du couteau. Par- 
Ions done du bas qui me quit- 
tera dans moins de cent vingt 
secondes. 

- Mais je ne I'ai deja plus ! 
Que faire 7 

- Tu veux de la rime facile ? 
Nous taire... 

- Tu veux cinq cent grammes 
de steak hacne ? Les volla 

- T'as pas du poivre (pour 
mieux me faire tousser) et des 
oignons (pour mieux me voir 
pleurer) pour le sleack a 
chier ? 

- Non, mais j'ai du salagou Je 
t'explique pas. tu connais 
aussi bien que moi. 

- OK Bon on va quand meme 
leur dire aux lecteurs que es- 
kijfzolg;,sf Merde, MERde, 
MEROE: j'ai pfein de graisse 
sur les doigts, j'arrive plus a 
taper 

- Non, tu n'es pas seneux Ex- 
pliquons-leur la vente Jean 
Dutourd s'est fait virer de 
France-Soir, et on le remplace 
au pied leve 

- Faux, tu t'occupes de Du- 
lourd, rrfoi je vais'au Monde 
preter assistance a Bert rand 
Potrot-Delpech qui ne s'en sort 
plus depuis que nous lui en- 
voy on s nos oeuvres 

- Tant qu'il defendra San-An- 



tonio, dont deux bouquins 
viennent de paraftre. |6 lul lais- 
serais sa place. Je crois que 
finalement je vais plutot alter 
bosser aux Nouvelles Litterai- 
res. 

- Son, pendant ce temps, j'ai- 
derais Machin a couler Maga- 
zine Hebdo. 

• T'es fou ? Ms voulaient 800 
briques, je leur ai envoys. 

- Bien vu I'aveugle. 

- Tu devrais pas dire ca, si 
des aveugles nous lisent... 

- Dans ces conditions, je re- 
tourne m'occuper de la Ga- 
zette de Betelgeuse. 

- Alors, c'est la derniere fois 
qu'on parle pas d'un logiciel 
en faisant croire que ? 

- Pourquoi tu leurdis ? 

- Et Fabrisli. alors, il dlsparaft 
aussi, ce chien ? Remarque, 
ca nous fera des vacances. 

- Non, je I'emmene avac mol 
pour lui faire faire deux-lrois 
liftings sur Alpha Centaurl. 

- Adieu, les lecteurs, on t'ai- 
maii bien. 

- Arh-ahr ! ET PAN I C'est fini, 
plus d'msultes Nananana- 
fiere... 

- Si, justement ! Je dirais.. 
Proute I 

- J'ai faim, done c'est la fin. ie 
suis tout nu, alors ne regardez 
plus. 

Miche et Micbk 
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A VOS CONSOLES Tl 99/4 
BASIC ETENDU DISPONIBLE 



BASIC ETENDU 



!<jr. (Entrees/sor- 



ties). Sous-programme*, stockage. sprites, tram 
d'erreurs. Expressions loglques. LET multiple. Intro- 
ductions multiples. Acces a I extension 32 K. 



(.EXTENSION MEMOIRE 

exterleure ram 32 K perme; de charger et execi 
des sous-programmes en assembleurs. La meme 
32 K est Indispensable pour une bonne utilisation 
basic etendu et du logo. 



INTERFACE PAR ALLELE 
CENTRONIC 



INTERFACE SERIE RS 232 

Branchemerit Immedlat i partlr du 11 99/4 A sur les 
Imprlmantes a sortie type BROTHER EP 44 et egale- 
ment sur MODEM. 



MOUVEAU : 




Unite de dlsquette Integree pour la boite perlpherl- 
que, slim line (1/2 hauteur) double face double derai- 
ls;, capacite 360 k avec le nouveau contrdleur de dls 

Cette tallle permet d'lntcgrer 2 lecteurs dans le com- 
partlment dlsque de la boite perlphertque. 



ASSEMBLEUR EDITEUR 

permet^ lutlllsaleur de programmer son Tl 99/4 A er 

langage assembleur. 

Neces5lte le controleur et I unite 

500,1X1 I 



Tl CALC Module 

Gestlon de tableaux, calcu 
tlenrenti a partlr de la cor 



in Jusqu'a 6.000 

... 360,00 f i ; 





Mlcro-ordlnateur Tl 99/4 A Pal 
Tl 99/4 Peritel 
Tl 99/4 Secam 
Magneto-cassettes Texas In 
Magneto-cassettes compatible Tl Lansay 
avec compteur 

Imprlmante Selltoscha GP 50 A 
Imprtmante Selkoscha GP 500 
EPSON RXB0 IrictlorVtraction 
Machine a ecrlre BROTHER EP 44 a memo 
et Imprlmante 

Interlace parallele exterieure pour Tl/99 
interface serle pour BROTHS! sur Ti/99 
Extended basic Europe Mamiel anglais 
Extended basic Europe Manuel francals 
iilon 32 K ext&leure 



1.350,00 
2^00,00 
4.150,00 

2.650,00 

1.090,00 

1.050,00 
750,00 



LOT N° 1 INDISPENSABLE 

Le Module BASIC ETENDU manuei en francals 
K7 BASIC PAR SOI MEME 

K7 TECHNIQUE DES PROGRAMMES DE JEUX N" I 
K7 TECHNIQUE DES PROGRAMMES OE JEUX N° 2 
B50.00 " 



LOT N" 3 ETUDE DU LOGO 

Le Module BASIC ETENDU manuei en francals 

EXTENSION MEMOIRE 32 K EXT. 

Tl LOGON" 2 

(.ensemble 2.705,00 ; 



GESTION PRIVEE Module 



GESTiON DE RAPPORTS Module 

Ce module cree, edlte et Imprlme des lettres stan- 
dards et des comptes rendu 375,00 



GESTION DE FICHIER 

Module complement a Ire et indispensable au I 
ronctlonnemenl du module gestlon de rapport 

260,00 n 



CARTE P-Code 

permet (execution de programmes ecrIM avec le 

lyiteme P 1.800,00 P D 

UCSD Pascal Compiler 500,00 F [I 

UCSD Pascal Linker 500,00 F D 

UCSD Pascal Editor 500,00 F D 

■ ensemble ; 3.300,00 F D 



MANETTE DE JEUX 



BON DE COMMANDE 
TARIFS JANVIER 1985 



VWe _ 

Ces prlx son inditaiifs el peuwnt etre modifies sans 

c/faWs. 

Produils disponiDles dans la limit? de nos stocks en 

magasin. 

Participation au> Itais de port et d'expediaon en fc>- 

commandt pour les togtciels +30 F 

LA RECLE A CALCUi 

65/67,tid Saint-Germain. 75005 PARIS 

TU 12^ 63 SB -Telex E7RAV2ZO064F.il 303 RAC 



m ptoduiU dlsponlblei sous 8 Jours. 
ider la lisle des modules dejevi. 



